RosettaCodeData/Task/Loops-Break/S-BASIC/loops-break-2.basic
2024-07-13 15:19:22 -07:00

14 lines
167 B
Text

var n = integer
repeat
begin
n = int(rnd(1) * 20)
print n;
if n <> 10 then
print int(rnd(1) * 20)
end
until n = 10
print " That's all!"
end