Loops/Continue: Difference between revisions
added Fortran
No edit summary |
(added Fortran) |
||
Line 43:
cout << ", ";
}</cpp>
=={{header|Fortran}}==
{{works with|Fortran|90 and later}}
DO i = 1, 10
IF (i == 5) THEN
WRITE(*, "(I1)") i
ELSE IF (i == 10) THEN
WRITE(*, "(I2)") i
ELSE
WRITE(*, "(I1,A)", ADVANCE="NO") i, ", "
ENDIF
END DO
=={{header|Java}}==
|