aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Another update from ingydotnet^djgoku

Browse source
This commit is contained in:
Ingy döt Net 2015-11-18 06:14:39 +00:00
parent 91df62d461
commit 948b86eafa
7604 changed files with 108452 additions and 22726 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Task/Loops-For/Fortran/loops-for-4.f Normal file
View file

@ -0,0 +1,3 @@
DO 1 I = 1,5
1 WRITE (6,*) ("*", J = 1,I)
END

4
Task/Loops-For/Fortran/loops-for-5.f Normal file
View file

@ -0,0 +1,4 @@
DO 1 I = 1,5
1 WRITE (6,2) (666, J = 1,I)
2 FORMAT(5I1)
END