Ввчислить рациональным способом. y=x^5,(т.е за три операции y=(x^2)^2x)

Question

Ввчислить рациональным способом.
y=x^5,(т.е за три операции y=(x^2)^2x)

Answer 1

Var x,x2,y:integer;
begin
readln(x);
x2:=x*x;
y:=x2*x2;
y:=y*x;
writeln('y = ',y);
end.

Пример:
2
y = 32