Loops/Continue: Difference between revisions
< Loops
Content added Content deleted
(+D) |
m (Added ColdFusion implementation.) |
||
Line 43: | Line 43: | ||
cout << ", "; |
cout << ", "; |
||
}</cpp> |
}</cpp> |
||
=={{header|ColdFusion}}== |
|||
Remove the leading space from the line break. |
|||
<cfscript> |
|||
for( i = 1; i <= 10; i++ ) |
|||
{ |
|||
writeOutput( i ); |
|||
if( 0 == i % 5 ) |
|||
{ |
|||
writeOutput( "< br />" ); |
|||
continue; |
|||
} |
|||
writeOutput( "," ); |
|||
} |
|||
</cfscript> |
|||
=={{header|D}}== |
=={{header|D}}== |
||
<d>for(int i = 1;i <= 10; i++){ |
<d>for(int i = 1;i <= 10; i++){ |
Revision as of 21:23, 29 July 2008
Loops/Continue
You are encouraged to solve this task according to the task description, using any language you may know.
You are encouraged to solve this task according to the task description, using any language you may know.
Show the following output using one loop.
1, 2, 3, 4, 5 6, 7, 8, 9, 10
Ada
Ada has no continue reserved word, nor does it need one. The continue reserved word is only syntactic sugar for operations that can be achieved without it as in the following example.
<ada> with Ada.Text_Io; use Ada.Text_Io;
procedure Loop_Continue is begin
for I in 1..10 loop Put(Integer'Image(I)); if I mod 5 = 0 then New_Line; else Put(","); end if; end loop;
end Loop_Continue; </ada>
C
<c>for(int i = 1;i <= 10; i++){
printf("%d", i); if(i % 5 == 0){ printf("\n"); continue; } printf(", ");
}</c>
C++
<cpp>for(int i = 1;i <= 10; i++){
cout << i; if(i % 5 == 0){ cout << endl; continue; } cout << ", ";
}</cpp>
ColdFusion
Remove the leading space from the line break.
<cfscript> for( i = 1; i <= 10; i++ ) { writeOutput( i ); if( 0 == i % 5 ) { writeOutput( "< br />" ); continue; } writeOutput( "," ); } </cfscript>
D
<d>for(int i = 1;i <= 10; i++){
writef(i); if(i % 5 == 0){ writefln(); continue; } writef(", ");
}</d>
Fortran
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
Java
<java>for(int i = 1;i <= 10; i++){
System.out.print(i); if(i % 5 == 0){ System.out.println(); continue; } System.out.print(", ");
}</java>
MAXScript
for i in 1 to 10 do ( format "%" i if mod i 5 == 0 then ( format "\n" continue ) continue format ", " )
Perl
<perl>foreach (1..10) {
print $_; if ($_ % 5 == 0) { print "\n"; next; } print ', ';
}</perl>
Pop11
lvars i; for i from 1 to 10 do printf(i, '%p'); if i rem 5 = 0 then printf('\n'); nextloop; endif; printf(', ') endfor;
Python
<python>line = "" for i in xrange(1,11):
line += str(i) if i % 5 == 0: print line line = "" continue line += ", "</python>
UnixPipes
yes \ | cat -n | head -n 10 | xargs -n 5 echo | tr ' ' ,