Anonymous user
Loops/While: Difference between revisions
→{{header|Prolog}}
No edit summary |
|||
Line 511:
<lang prolog>while(0) :- !.
while(X) :- X>0,write(X), nl, X1 is X // 2, while(X1).</lang>
=={{header|PureBasic}}==
<lang PureBasic>OpenConsole()
x.i = 1024
While x > 0
PrintN(Str(x))
x / 2
Wend
Repeat
Until Inkey() <> ""</lang>
=={{header|Python}}==
| |||