Создайте программу в pascal для вычисления следующей функции: y = √x^3+8

если √(x^3)+8

var

x,y:integer;

begin

write('x = ');

readln(x);

write('y = ',sqrt(x*x*x)+8);

end.

если (√x)^3+8

var

x,y:integer;

begin

write('x = ');

readln(x);

write('y = ',sqrt(x)*x+8);

end.