13 lines
149 B
Text
13 lines
149 B
Text
|
MODULE ForBy;
|
||
|
|
IMPORT InOut;
|
||
|
|
|
||
|
|
VAR
|
||
|
|
i: INTEGER;
|
||
|
|
|
||
|
|
BEGIN
|
||
|
|
FOR i := 0 TO 100 BY 2 DO
|
||
|
|
InOut.WriteInt(i, 3);
|
||
|
|
InOut.WriteLn
|
||
|
|
END
|
||
|
|
END ForBy.
|