Информатика, 9 класс. Паскаль. Задача: Дано х. Вычислить рациональным способом х в 15 степени за пять операций.

Есть специальная формула, которая позволяет вычислить это в одну строчку:
x^n = exp(ln(x) * n).

var x, n, y: integer;
begin
writeln('X='); Read(x);
n:=15;
y := exp(ln(x) * n);
Writeln('Result=', y);
End.

var x,y:real; begin readln(x); y:=x*x; y:=y*y; y:=y*y; y:=y*y; y:=y/x; writeln(y); readln end.

1)

var
y,x: integer;
begin
readln(x);
y:=sqr(sqr(x))*x; //x^5, а дальше сами по аналогии
writeln(y);
end.

2)
var x,y: integer;
begin
readln(x);
y:=x*x;
y:=y*y;
y:=y*x;
writeln(y);
end.