Дано целое число N. Написать программу для выводу ** экран степеней числа 2 от 1 до N.

Question

Дано целое число N. Написать программу для выводу на экран степеней числа 2 от 1 до N.

Answer 1

uses Math;

var i,n:integer;

begin

write('Введите число N: ');

readln(n);

for i:=1 to n do

write(power(2,i):0:0,'  ');

readln

end.