Паскаль АВС:
Program Vareeenka;
uses crt;
var
x,y:real;
begin
writeln(*** Alphaeus is thinking... ***);
writeln(*** OK ***);
writeln();
write(Введите основание степени ); readln (x);
write(Введите показатель степени ); readln (y);
writeln(*** Вычисляю... ***);
writeln(power(x,y):8:2); ;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.