Question

построить программу ифнорматика

Answer 1

var s,x,b,a: real;
begin
readln(x,b,a);
s:=sqrt((x*b)/a)+sqr(cos(exp(ln(x+b)*3)));
writeln(s);
end.