program prog
      do i=1,2
        write(6,*) i
      enddo
      do i=1,2*3
        write(6,*) i
      enddo
      do 10 j=3,5,2
        write(6,*) j
   10 enddo
      end