RosettaCodeData/Task/Loops-Break/ALGOL-68/loops-break.alg

12 lines
178 B
Text
Raw Permalink Normal View History

2025-06-11 20:16:52 -04:00
#main#
(
2023-07-01 11:58:00 -04:00
WHILE
2025-06-11 20:16:52 -04:00
INT a = ENTIER (random * 20);
2023-07-01 11:58:00 -04:00
print((a));
2025-06-11 20:16:52 -04:00
a /= 10
DO
print((ENTIER (random * 20), new line))
2023-07-01 11:58:00 -04:00
OD;
print(new line)
)