r=readLn main=r>>=f f x=print x>>do i<-r;print$x+i;f i