! 学習目的:do文(その2) ! ex202.f do 10 i=1,5 write(*,*) i 10 write(*,*) i !continue以外でも可 write(*,*) iend=2 do 20 i=1,iend !変数も使える do 25 j=1,2 !インデント(字下げ)を行うことによって見やすくすることを薦める k=i+j ! i=i+1のように,do文の変数はdoループのなかで変えることはできない write(*,*) 'i=',i,' j=',j,' k=',k 25 continue 20 continue do i=1,5,2 write(*,*) i end do !行番号を省略した場合,do, end do で繰り返すことが可能. stop end