Anonymous user
Loops/Do-while: Difference between revisions
Added DWScript
No edit summary |
(Added DWScript) |
||
Line 179:
Readln;
end.</lang>
=={{header|DWScript}}==
<lang Delphi>
var i := 0;
repeat
Inc(i);
PrintLn(i);
until i mod 6 = 0;
</lang>
=={{header|E}}==
| |||