{ z=0; d=1; n=-1; print (n++ " " real(z)); for (x=0, 100, for (s=1, max(1, 2*x), z+=d; print (n++ " " real(z)); ); d*=I; ); } quit