script


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

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!"