Loops/While: Difference between revisions

m (→‎{{header|ALGOL 60}}: A correction)
(→‎{{header|Simula}}: Section added)
Line 1,828:
i //= 2
}</lang>
 
=={{header|Simula}}==
{{trans|algol60}}
{{works with|SIMULA-67}}
<lang simula>
begin
integer i;
i:=1024;
while i>0 do
begin
outint(i,5);
i:=i//2-1
end
end
</lang>
{{out}}
<pre>
 1024  511  254  126   62   30   14    6    2 
</pre>
 
 
=={{header|Slate}}==
1,392

edits