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