var x,y,p:real;
begin
write('Введите X= '); readln(x);
write('Введите Y= '); readln(y);
p:= sqrt((abs(sqr(x)-2*x+5))/(abs(8*x-y)))-5*x*y-((3*x+y)/abs(x-y));
writeln(p);
end.
var x,y,p:real;
begin
write('Введите X= '); readln(x);
write('Введите Y= '); readln(y);
p:= sqrt((abs(sqr(x)-2*x+5))/(abs(8*x-y)))-5*x*y-((3*x+y)/abs(x-y));
writeln(p);
end.