• Предмет: Информатика
  • Автор: bymhkpwcchsy
  • Вопрос задан 3 года назад

Дано вещественное число A и целое число N

Ответы

Ответ дал: Exdie
0

Ответ:

1  var

2  a, an, n, i: integer;

3  

4  begin

5  readln(a, n);

6  an := 1;

7  for i := 1 to n do

8  begin

9  an := an * a;

10  writeln(i, ' ', an)

11  end

12  end.

Объяснение:

Вас заинтересует