6 lines
76 B
Prolog
6 lines
76 B
Prolog
|
while(0) :- !.
|
||
|
|
while(X) :-
|
||
|
|
writeln(X),
|
||
|
|
X1 is X // 2,
|
||
|
|
while(X1).
|