fork download
  1. Program LAB2 (Input,Output);
  2. Const
  3. u=10.05;
  4. v=0.35;
  5. Var
  6. b:real;
  7. Begin
  8. b:= sqrt(sqr(sin(arctan(u)))+cos(v));
  9. writeln('Result is b=',b:0:6);
  10. End.
Success #stdin #stdout 0.01s 5320KB
stdin
Standard input is empty
stdout
Result is b=1.389089