Question

Дано натуральное число N. Выведите его представление в двоичном виде в обратном порядке. Pascal ABC

Answer 1

Var n:integer;
begin
write('n = '); readln(n);
while n<>0 do
 begin
 write(n mod 2);
 n:=n div 2;
 end;
writeln;
end.

Пример:
n = 8
0001