Loops/While: Difference between revisions

Content added Content deleted
m (code to lang, but left something untouched because of doubts)
Line 209:
=={{header|Modula-3}}==
The usual module code and imports are omitted.
<lang modula3>PROCEDURE DivBy2() =▼
<pre>
▲PROCEDURE DivBy2() =
VAR i: INTEGER := 1024;
BEGIN
Line 218 ⟶ 217:
i := i DIV 2;
END;
END DivBy2;</lang>
</pre>
 
=={{header|Oberon-2}}==
Retrieved from "https://rosettacode.org/wiki/Loops/While"