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