m=-1;read*,n;k=1;l=0;do i=2-n*2,0;do j=i/2,0;m=m+k;n=n+l;print'(2i0" "$)',m,n-1;enddo;j=k;k=l;l=-j;enddo;end