13 lines
187 B
Text
13 lines
187 B
Text
var n = integer
|
|
|
|
while (1 = 1) do
|
|
begin
|
|
n = int(rnd(1) * 20)
|
|
print n;
|
|
if n = 10 then goto 0_done
|
|
n = int(rnd(1) * 20)
|
|
print n
|
|
end
|
|
0_done print " That's all!"
|
|
|
|
end
|