ＴＡＮ
copyright

green dotＴＡＮ

書式TAN(X)
機能 Xの正接(tan X)を計算する。
引数 X：実数型
戻り値 型、種別型パラメタは引数と同じである。

green dotサンプルプログラム

0.0, 30.0の正接(tan X)の値を返す。 
    REAL :: pi,a,b
    pi=3.141592
    a=0.0/180.*pi; b=30.0/180.*pi
    WRITE(*,*) TAN(a),TAN(b)


実行例

    0.00000… 0.57735…
line-end