125 lines
914 B
Standard ML
Executable file
125 lines
914 B
Standard ML
Executable file
#!/usr/bin/env fun
|
|
|
|
/*
|
|
* This file is part of the Fun programming language.
|
|
* https://fun-lang.xyz/
|
|
*
|
|
* Copyright 2026 Johannes Findeisen
|
|
* Licensed under the terms of the Apache-2.0 license.
|
|
* https://opensource.org/license/apache-2-0
|
|
*
|
|
* Added: 2026-03-25
|
|
*/
|
|
|
|
// Classic FizzBuzz from 1..100
|
|
i = 1
|
|
while (i <= 100)
|
|
out = ""
|
|
if (i % 3 == 0) out = out + "Fizz"
|
|
if (i % 5 == 0) out = out + "Buzz"
|
|
if (len(out) == 0) out = to_string(i)
|
|
print(out)
|
|
i = i + 1
|
|
|
|
/* Expected output:
|
|
1
|
|
2
|
|
Fizz
|
|
4
|
|
Buzz
|
|
Fizz
|
|
7
|
|
8
|
|
Fizz
|
|
Buzz
|
|
11
|
|
Fizz
|
|
13
|
|
14
|
|
FizzBuzz
|
|
16
|
|
17
|
|
Fizz
|
|
19
|
|
Buzz
|
|
Fizz
|
|
22
|
|
23
|
|
Fizz
|
|
Buzz
|
|
26
|
|
Fizz
|
|
28
|
|
29
|
|
FizzBuzz
|
|
31
|
|
32
|
|
Fizz
|
|
34
|
|
Buzz
|
|
Fizz
|
|
37
|
|
38
|
|
Fizz
|
|
Buzz
|
|
41
|
|
Fizz
|
|
43
|
|
44
|
|
FizzBuzz
|
|
46
|
|
47
|
|
Fizz
|
|
49
|
|
Buzz
|
|
Fizz
|
|
52
|
|
53
|
|
Fizz
|
|
Buzz
|
|
56
|
|
Fizz
|
|
58
|
|
59
|
|
FizzBuzz
|
|
61
|
|
62
|
|
Fizz
|
|
64
|
|
Buzz
|
|
Fizz
|
|
67
|
|
68
|
|
Fizz
|
|
Buzz
|
|
71
|
|
Fizz
|
|
73
|
|
74
|
|
FizzBuzz
|
|
76
|
|
77
|
|
Fizz
|
|
79
|
|
Buzz
|
|
Fizz
|
|
82
|
|
83
|
|
Fizz
|
|
Buzz
|
|
86
|
|
Fizz
|
|
88
|
|
89
|
|
FizzBuzz
|
|
91
|
|
92
|
|
Fizz
|
|
94
|
|
Buzz
|
|
Fizz
|
|
97
|
|
98
|
|
Fizz
|
|
Buzz
|
|
*/
|