Fortran

コンパイル

gfortran hello.f90

おまじない

program hello
    implicit none
end program hello

コメントアウト

! ここに一行コメント

標準入出力

書式設定

書式に名前を付けて使える

100 format('y=',f5.2)
write(*,100)y

if文

if((m>2).and.(m<6))then
    write(*,*)"Spring"
else if((m>5).and.(m<9))then
    write(*,*)"Summer"
else
    write(*,*)"Winter"
end if

while

do while (abs(xnew-xold) > epsilon)
    xold=xnew
    xnew=xold-f(xold)/df(xold)
    write(*,1000) "result=",xnew
end do

for

do 変数=初期値,最終値[,刻み幅]
    繰り返したい処理
end do