19 lines
184 B
Plaintext
19 lines
184 B
Plaintext
func divisible
|
|
if (arg1 == 0)
|
|
ret 0
|
|
end
|
|
ret (arg0 % arg1)
|
|
end
|
|
|
|
set a 0
|
|
set b 4
|
|
do
|
|
set a (a + 1)
|
|
divisible a b > i
|
|
if (i == 0)
|
|
print a
|
|
end
|
|
while (a < 100)
|
|
|
|
print "All done!"
|