program zad2;
const a=1; b=7; c=2;
var x,y,z,f,w,t,x1,x2,dx,p1,p2,p3,q1:real;
i:integer;
begin x1=1.2; x2=2.1; dx=0.10;
writeln ('x    y   z);
x:=x1; while (x<x2) do
begin y=exp(x/5); z=sqrt(abs(y)+x); f=(y+0.5)/(abs(z)+x); w=abs(f*f*f);
if not odd(c) then begin
q1:=sin (y*y); p1:=1.0;
for i:=1 to a do p1:=p1*q1;
p2:=1; for i:=1 to b do p2:=p2*z;
t:=exp(ln(abs(cos(p2))))/3;
if cos(p2)<0 then t:=-t; t:=t+1; end
else if odd(a) then begin
p3:=1; for i:=1 to c do p3:=p3*x;
t:=arctan(p3)/(1+w*w); end
else t:=ln(1+sqrt(abs(f)));
writeln(x:7:2; t:2:4);
readln
x:=x+dx;
end;
end.