По данному куску кода выясните какое значение переменной X было подано

По данному куску кода выясните какое значение переменной X было подано на входе если знаменито что в итоге выполнения данного кода на выходе значение переменной Y одинаково 229345007.
var X, Y, i : longint;
begin
readln (X);
Y:=1;
for i:=1 to 5 do
Y:=Y * X;
writeln (Y);
end.