По данному числу N распечатайте все целые степени двойки, не превосходящие N, в порядке возрастания.

Операцией возведения в степень пользоваться нельзя!

Входные данные
Вводится натуральное число.

Выходные данные
Выведите ответ на задачу.

Примеры
входные данные
50
выходные данные
1 2 4 8 16 32

var n,k:integer;beginwrite('n='); readln(n);k:=1;while k<=n do begin write(k,'  '); k:=k*2; end;writeln;end.Пример:n=501  2  4  8  16  32