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

Question

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

Гость

Ответ(ы) на вопрос:

Accepted Answer

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