Var x,y,z:real;
begin
writeln(ВВЕДИТЕ ЧИСЛО);
readln(x);
writeln(ВВЕДИТЕ СТЕПЕНЬ);
readln(y);
z:= x^(1*y);
writeln(ОТВЕТ:, z);
end.
почему этот код не работает??
Потомучто в паскале нет такой операции ^
нужно заменить
z:=exp(x*ln(y));
Оцени ответ
