Anonymous user
Loops/While: Difference between revisions
→{{header|Oz}}
Line 877:
I := @I div 2
end</lang>
=={{header|Panoramic}}==
<lang Panoramic>
dim x%:rem an integer
x%=1024
while x%>0
print x%
x%=x%/2
end_while
rem output starts with 1024 and ends with 1.
end
</lang>
=={{header|PARI/GP}}==
|