Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- const a=4; b=2;
- var
- x, y, f:real;
- begin
- write('Enter x=');
- readln(x);
- y:=exp(ln(x)*5) * cos(a+x) - exp(ln(Abs(2*x-a)) * (1/3)) + ln((x-2)*(x-2) + 2);
- f:=exp(ln(a*x*x+b*x) * (1/2)) * exp(-a*x) + ln(Abs(a-x) + 3);
- writeln('y=', y);
- writeln('F=', f);
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement