Ответы
Ответ дал:
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.
Объяснение:
Вас заинтересует
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад