RosettaCodeData/Task/Loops-Break/Oforth/loops-break.fth
2023-07-01 13:44:08 -04:00

5 lines
113 B
Forth

while(true) [
19 rand dup print ":" print
10 == ifTrue: [ break ]
19 rand print " " print
]