Напишите ** языке Паскаль наиболее короткие алгоритмы вычисления а)у=х^12 , б)у=х^17 ,...

Question

Напишите на языке Паскаль наиболее короткие алгоритмы вычисления а)у=х^12 , б)у=х^17 , в)у=х^20

Answer 1

Program p1;
var x,i,num:longint;
function stepen(x,n:integer):longint;
begin
if n=1 then stepen:=x
else stepen:=x*stepen(x,n-1);
end;
begin
readln(x);
writeln(stepen(x,12));
writeln(stepen(x,17));
writeln(stepen(x,20));
end.

Comments

С чего это? Короткая рекурсивная функция, короткая основная программа, выводит все три задания(а,б,в) разом.

---

Хотя предложи свое, я не профи

---

Можно узнать , что такое exp(); в паскале?

---

Спасибо