Составить программу на языке Паскаль Ввести с клавиатуры вещественное число A и целое число N (> 0). Вывести все целые степени числа A от 1 до N.
1 комментария:
Комментарий удален

Ответы

Var
a: real;
n: integer;
begin
read(a, n);
for var k := 1 to n do
begin
write(power(a, k), ' ');
end;
end.
Нет комментариев