Program ff3_19;<br/>
uses crt;<br/>
var x,y:real;<br/>
BEGIN<br/>
clrscr;<br/>
writeln('vvedite x=');<br/>
readln(x);<br/>
y:=sin ((3.2+sqrt(1+x))/abs(5*x));<br/>
writeln('Otvet y=',y:5:2);<br/>
readln;<br/>
END.<br/>