出力は、write 文でできた。入力は、read 文を使う。
real a,b,c,de
c
read(*,*) a,b,c
write(*,*) " a=",a,"; b=",b,"; c=",c
de= b*b-4.0*a*c
write(*,*) sqrt(de),-sqrt(de)
c
end
上記のプログラムをコンパイルして実行すると、a, b, c の3変数をキーボード
から入力すると実行を始める。