13 lines
270 B
Text
13 lines
270 B
Text
# straight-forward buffer builder
|
|
procedure main()
|
|
every i := 1 to 100 do {
|
|
s := ""
|
|
if i % 3 = 0 then
|
|
s ||:= "Fizz"
|
|
if i % 5 = 0 then
|
|
s ||:= "Buzz"
|
|
if s == "" then
|
|
s := i
|
|
write(s)
|
|
}
|
|
end
|