Var x,y,z:real; begin writeln('ВВЕДИТЕ ЧИСЛО'); readln(x); writeln('ВВЕДИТЕ СТЕПЕНЬ');...

Question

Var x,y,z:real;
begin
writeln('ВВЕДИТЕ ЧИСЛО');
readln(x);
writeln('ВВЕДИТЕ СТЕПЕНЬ');
readln(y);
z:= x^(1*y);
writeln('ОТВЕТ:', z);
end.
почему этот код не работает??

Answer 1

Потомучто в паскале нет такой операции ^
нужно заменить 
z:=exp(x*ln(y));