Var a,b,x:real;
begin
writeln('enter a and b');
readln(a,b);
x:=(arcsin(a/(a+1.2))+exp(-abs(a+b)))/(exp(2*ln(ln(a*a+b*b)/ln(10))+arccotan(pi/exp(4*ln(a))+b*b+2.7));
writeln('x=', x:6:3)
end.
Var a,b,x:real;
begin
writeln('enter a and b');
readln(a,b);
x:=(arcsin(a/(a+1.2))+exp(-abs(a+b)))/(exp(2*ln(ln(a*a+b*b)/ln(10))+arccotan(pi/exp(4*ln(a))+b*b+2.7));
writeln('x=', x:6:3)
end.