//cos 2/x –2sin 1/x + 1/x const x0=1; xk=2; var x,y,h:real; begin h:=0.1; x:=x0; writeln(' x y'); while x<=xk+h/10 do begin y:=cos(2/x)-2*sin(1/x)+1/x; writeln(x:3:1,y:7:3); x:=x+h; end; end.