do igr=0,90,10
	
	rad=igr*3.1415926536/180.
	
	print '(i5,4f10.5)',igr,sin(rad),cos(rad)
	enddo
	stop
	end