From fb9ccc4fb6e64e635c7e2a7ad6442ed265b2e584 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=E6=A2=B6=E5=A1=9A=E5=A4=AA=E6=99=BA?=
 <kajizukataichi@outlook.jp>
Date: Sat, 27 Jul 2024 14:48:15 +0900
Subject: [PATCH] Update README.md

---
 README.md | 34 ++++++++++++++++++++--------------
 1 file changed, 20 insertions(+), 14 deletions(-)

diff --git a/README.md b/README.md
index dd13a70..18b6203 100644
--- a/README.md
+++ b/README.md
@@ -10,24 +10,30 @@ In meaning, S stands for Speed, Secure, Simple and Small.
 
 ## [Example code](/example.ss)
 ```
-// This program to solve FizzBuzz;
+// This program is to solve FizzBuzz;
+
+fn fizzbuzz(i) {
+    if i % 15 == 0 {
+        return "FizzBuzz";
+    };
+    if i % 5 == 0 {
+        return "Buzz";
+    };
+    if i % 3 == 0 {
+        return "Fizz";
+    };
+    return str(i);
+};
+
+fn add_text(source, text) {
+    return source + text + " "
+};
+
 var i <- 0;
 var result <- "";
 while i < 100 {
     var i <- i + 1;
-    if i % 15 == 0 {
-        var result <- result + "FizzBuzz ";
-    }; if !(i % 15 == 0) {
-        if i % 5 == 0 {
-            var result <- result + "Buzz ";
-        }; if !(i % 5 == 0) {
-            if i % 3 == 0 {
-                var result <- result + "Fizz ";
-            }; if !(i % 3 == 0) {
-                var result <- result + f"{i} ";
-            };
-        };
-    };
+    var result <- add_text(result, fizzbuzz(i));
 };
 print result;
 ```