Запишем ** Языке Паскаль алгоритм вычисления степени с натуральным показателем n для...

Question

Запишем на Языке Паскаль алгоритм вычисления степени с натуральным показателем n для любого существенного числа a СРОЧНО❤❤❤

---

Comments

могу только на питоне

---

Нет,мне нужно на Паскале

Answer 1

Ответ:

var

 a, i, n, sum: integer;

 

begin

 read(a, n);

 sum := 1;

 for i := 1 to n do sum := sum * a;

 writeln(sum);

end.

Answer 2

немного покрасивее сделал

////////////////////////////////////////////

program vozvedenieVstepen;

var  a, i, n, sum: integer;

begin

 write('число = ');

 readln(a);

 write('степень = ');

 readln(n);

 sum:=1;

 for i:=1 to n do

   sum:=sum*a;

 writeln(sum);

end.

Comments

Спасибо!)Вы же уверены в правильности этого ответа?

---

Да, я проверял работоспособность в среде PascalABCNET