Vla_DOS

Untitled

Mar 29th, 2022
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.15 KB | None | 0 0
  1. program MyProgram;
  2. var
  3.   a,b,c,f,x: double;
  4. begin
  5.   a:=-6;
  6.   b:=6.4;
  7.   c:=8.8;
  8.   f:=power(e,a)+2*ln(b+c)/(ArcTan(b))+(a*b);
  9.   writeln(f);
  10. end.
Advertisement
Add Comment
Please, Sign In to add comment