Loops/Continue: Difference between revisions

Content deleted Content added
No edit summary
No edit summary
Line 228: Line 228:
out x | (x `mod` 5 == 0) = (putStrLn . show) x
out x | (x `mod` 5 == 0) = (putStrLn . show) x
| otherwise = (putStr . (++", ") . show) x</lang>
| 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}}==
=={{header|J}}==