Loops/Continue: Difference between revisions
PascalABC.NET
(added RPL) |
(PascalABC.NET) |
||
Line 1,897:
=={{header|Pascal}}==
See [[Loops/Continue#Delphi | Delphi]]
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
begin
for var i:=1 to 10 do
begin
Write(i);
if i mod 5 = 0 then
begin
Writeln;
continue
end;
Write(', ');
end;
end.
</syntaxhighlight>
{{out}}
<pre>
1, 2, 3, 4, 5
6, 7, 8, 9, 10
</pre>
=={{header|Perl}}==
| |||