ルーチン('A`)

FORTRAN77

プログラミングってなんで…こう…マンドクサイダ？('A`)
ああ…明日から情報処理はサブルーチンの範囲へ…

もうね…

c    
      subroutine hage
      real Unko,Bu,Ri
      Ri=2
      do 100 Bu=1,10
      Unko=Bu+Ri**2
100   continue
      return
      end
c
      program aho
      real Asa,Iti,No
      call hage (Unko)
      do 200 No=1,5
      Asa=Iti*No+Unko
      write(*,*) '下痢',No,'には',Asa,'正露丸'
200   continue
      stop
      end

こんなん書きたくなっちまいますよ…('A`)ホントに…

CやC++勉強したいのにーーー↓
なんでFORTRAN77なんでっか？
キモーーーーーイＫさん..................