17 lines
253 B
Text
17 lines
253 B
Text
max = 20
|
|
words$[] = [ "Fizz" "Buzz" "Baxx" ]
|
|
keys[] = [ 3 5 7 ]
|
|
#
|
|
for n = 1 to max
|
|
prnt = 1
|
|
for j = 1 to len keys[]
|
|
if n mod keys[j] = 0
|
|
write words$[j]
|
|
prnt = 0
|
|
.
|
|
.
|
|
if prnt = 1
|
|
write n
|
|
.
|
|
print ""
|
|
.
|