Помогите пожалуйста!Даны x, y. Написать программы, позволяющие получить: / |xy| + 5 В...

Question

Помогите пожалуйста!
Даны x, y. Написать программы, позволяющие получить: / |xy| + 5
В ПАСКАЛЕ!

Answer 1

Var x,y,r:real;
begin
write ('Введите 2 числа х и у '); Readln(x,y);
r:=x*x+y*y/abs(x*y)+5;
writeln( 'Значение выражения = ' , r);
end.