!@ŠwK–Ú“IFdo•¶(‰ž—p‚PjF‚P‚©‚ç‚P‚O‚܂ł̘a ! ex204.f nsum=0 do 10 i=1,10 nsum=nsum+i 10 continue write(*,*) nsum stop end