program loop2
      do 200, i=1,10

        write(*,*) i,'+',i,'=',i+i


 200  continue
      end