11 lines
164 B
Text
11 lines
164 B
Text
procedure Repeat(integer rid, integer n)
|
|
for i=1 to n do
|
|
rid()
|
|
end for
|
|
end procedure
|
|
|
|
procedure Hello()
|
|
?"Hello"
|
|
end procedure
|
|
|
|
Repeat(Hello,5)
|