13 lines
189 B
Text
13 lines
189 B
Text
|
def repeat (function f, int n)
|
||
|
|
for (set n n) (> n 0) (dec n)
|
||
|
|
f
|
||
|
|
end for
|
||
|
|
end repeat
|
||
|
|
|
||
|
|
def procedure ()
|
||
|
|
out "Hello! " console
|
||
|
|
end procedure
|
||
|
|
|
||
|
|
# outputs "Hello! " 5 times
|
||
|
|
repeat procedure 5
|