RosettaCodeData/Task/Loops-For-with-a-specified-step/ALGOL-M/loops-for-with-a-specified-step.algol-m
2017-09-25 22:28:19 +02:00

5 lines
79 B
Text

BEGIN
INTEGER I;
FOR I := 1 STEP 3 UNTIL 19 DO
WRITE( I );
END