RosettaCodeData/Task/Loops-For/Modula-3/loops-for.mod3
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

12 lines
154 B
Text

MODULE Stars EXPORTS Main;
IMPORT IO;
BEGIN
FOR i := 1 TO 5 DO
FOR j := 1 TO i DO
IO.Put("*");
END;
IO.Put("\n");
END;
END Stars.