double x,y,z;
{
	rd(x);
	if(x==0)x=y=1;
	y+=5e-07;
	while(x<1e6)z=sin(x)/x,y+=z*z,x+=1;
	wt(y);
}