Loops/Do-while: Difference between revisions

PascalABC.NET
m (Moved Wren entry into correct alphabetical order.)
(PascalABC.NET)
 
(One intermediate revision by one other user not shown)
Line 1,183:
 
=={{header|EasyLang}}==
<syntaxhighlight lang="easylang">
EasyLang does not include an built-in do-while loop, but a repeat-until loop can be used, with the condition inside a '''not''' operator.
<syntaxhighlight lang="easylang">
value = 0
repeat
Line 2,477 ⟶ 2,476:
until i mod 6 = 0
end.</syntaxhighlight>
 
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
begin
var a := 0;
repeat
a += 1;
Print(a);
until a mod 6 = 0;
end.
</syntaxhighlight>
 
 
 
=={{header|Perl}}==
246

edits