12 lines
149 B
Text
12 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.
|