read*,i;do j=2,i;print*,3;enddo;print*,1;end