Hello, world!
Posted feedbacks - FORTRAN
FORTRAN-77。これまた、懐かしい。。。 7桁目から書き始めます。
1 2 3 | C234567
WRITE(*,*) '簡単なプログラム'
END
|
FORTRANと言ったらこうでしょう(^^;。
1 2 3 4 5 | C234567
WRITE(6,100)
STOP
100 FORMAT(1H ,13HHELLO, WORLD!)
END
|
あ,題意の Hello, world! になってませんね。全部大文字になっています。でも初期のFORTRANでは全部大文字になるのが当たり前だったんです。 最近の処理系なら小文字でもコンパイルできますけど。
1 2 3 4 5 | C234567
WRITE(6,100)
STOP
100 FORMAT(1H ,13HHello, world!)
END
|
see: Fortran入門:モジュール
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | Module Universe
implicit none
Public :: HelloWorld
contains
Subroutine HelloWorld()
Print *, "Hello World"
End Subroutine HelloWorld
End Module
Program Main
use Universe, Only: HelloWorld
implicit none
call HelloWorld
End Program Main
|





にしお
#3358()
Rating0/0=0.00
[ reply ]