4 lines
62 B
FortranFixed
4 lines
62 B
FortranFixed
|
DO 1 I = 1,5
|
||
|
|
1 WRITE (6,*) ("*", J = 1,I)
|
||
|
|
END
|