Anonymous user
Loops/Continue: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 228:
out x | (x `mod` 5 == 0) = (putStrLn . show) x
| otherwise = (putStr . (++", ") . show) x</lang>
=={{header|HicEst}}==
<lang hicest>DO i = 1, 10
IF( MOD(i, 5) == 1 ) THEN
WRITE(Format="i3") i
ELSE
WRITE(APPend, Format=" ',', i3 ") i
ENDIF
ENDDO </lang>
=={{header|J}}==
| |||