Возведение в степень числа в Delphi

[Gallaxy]

Нужно создать программу которая могла бы делать такую штуку : X^Y=Z
Я только начал изучать так что прошу помидорами не кидаться
Написал следущее:

program Project2;

{$APPTYPE CONSOLE}

 uses
  SysUtils,Math;
 var
 X,Y,Z:real;

 begin
write ('X=');
readln(X);
write ('Y=');
readln(Y);
Z:=exp(Y*ln(X));
Writeln ('Z=',Z);
readln;

 end.

ругается на readln; . exp(Y*ln(X)) вот эту штуку нашел где-то на форуме не знаю дейстивтельно ли это работает Подскажите где я накосячил пожалуйста. Делал по аналогии со следющей только поставил ln и ввел переменную Z.

program vozvodilka;

{$APPTYPE CONSOLE}

uses
Math;

var
X,Y:real;

begin
 write ('x=');
 readln (x);
 Y:=x*x;
 Writeln ('Y=',Y);
 readln;
end.

[Snejnaya]

Z:=exp(Y*ln(X));

на эту строчку ругается?

возможно дело в том, что область определения логарифма X>0, а Х объявлено как real.

Как звучало задание? Возможно для возведения в степень можно или даже нужно было использовать цикл? Типа:

var i:integer;
Z:=1;
for i:=1 to Y do
begin
Z:=Z*X;
end;

[Stilet]

Первая проверена:

X=4
Y=5
Z= 1.02400000000000E+0003

Вторая проверена:

x=5
Y= 2.50000000000000E+0001

Проверка была не D6 все оллрайт.

[Alexei91]

Gallaxy в Math есть ф-я Power(<число>,<cтепень числа>).

var
s: integer;
begin    
s := trunc(Power(2,3));
...
end.

trunc - перевод в целое.
power работает с типом extended.

[Gallaxy]

Все спасибо разобрался