interpreter/script

19 lines
184 B
Plaintext
Raw Normal View History

2018-02-12 11:23:17 -05:00
func divisible
if (arg1 == 0)
ret 0
end
ret (arg0 % arg1)
2018-02-07 09:26:36 -05:00
end
2018-02-06 08:48:21 -05:00
set a 0
2018-02-12 11:23:17 -05:00
set b 4
2018-02-06 08:48:21 -05:00
do
2018-02-12 11:23:17 -05:00
set a (a + 1)
divisible a b > i
if (i == 0)
print a
2018-02-07 09:26:36 -05:00
end
while (a < 100)
2018-02-12 11:23:17 -05:00
print "All done!"