Lotus Symphony 1.2


Cos 函數 [執行時期]

計算一個角度的餘弦值。角度以弧度為單位指定。結果在 -1 到 1 之間。

以 Alpha 角為例,在直角三角形中 Cos 函數計算 Alpha 角度的鄰邊與斜邊長度之比。

Cos(Alpha) = 鄰邊/斜邊

語法:

Cos (Number)

回覆值:

Double

參數:

Number:數值表示式,用於指定要計算餘弦值的角度 (以弧度為單位)。

若要將度轉換成弧度,可將度乘以 pi/180。若要將弧度轉換成度,可將弧度乘以 180/pi。

度 = (弧度*180) /pi

弧度 = (度*pi)/180

其中,PI 是固定的圓周率常數,捨入後的值為 3.14159...

錯誤代碼

5 無效的程序呼叫

範例:

REM 以下範例以直角三角形為例,要求輸入

REM 依據鄰邊和角度 (以度為單位),並計算三角形斜邊的長度:

Sub ExampleCosinus

REM 捨入後的 PI = 3.14159

Dim d1 as Double, dAngle as Double

d1 = InputBox$ (""Enter the length of the adjacent side:","Adjacent")

dAngle = InputBox$ ("Enter the angle Alpha (in degrees):","Alpha")

Print "The length of the hypothenuse is"; (d1 / cos (dAngle * Pi / 180))

End Sub


其他文件 | 商標