SQRT
copyright

green dotSQRT

書式SQRT(X)
機能 Xの平方根を計算する。
引数 X:実数型(X>0),複素数型
戻り値 型、種別型パラメタは引数と同じである。

green dotサンプルプログラム

c= (a2+b2)1/2を求める。
    REAL :: a,b,c
    a=30.0; b=40.0
    c=SQRT(a*a+b*b)
    WRITE(*,*) c

実行例
50.0000…
line-end