IBM Lotus Symphony


Cos-funktio [käytönaikainen]

Laskee kulman kosinin. Kulma määritetään radiaaneina. Tulos on -1 - 1.

Alpha-kulman avulla Cos-funktio laskee kulman viereisen sivun pituuden suhteen jaettuna hypotenuusan pituudella suorakulmaisessa kolmiossa.

Cos(Alpha) = Viereinen/Hypotenuusa

Syntaksi:

Cos (Number)

Palautusarvo:

Pitkä liukuluku

Parametrit:

Number: Numeerinen lauseke, joka määrittää radiaaneina kulman, jonka kosinin haluat laskea.

Voit muuntaa asteet radiaaneiksi kertomalla asteet arvolla pii/180. Voit muuntaa radiaanit asteiksi kertomalla radiaanit arvolla 180/pii.

aste=(radiaani*180)/pii

radiaani=(aste*pii)/180

Piin arvo on tässä pyöristetty lukuun 3,14159.

Virhekoodit

5 Virheellinen toimintokutsu

Esimerkki:

REM Seuraava esimerkki käyttää suorakulmaista kolmiota ja syöttää

REM sekantin ja kulman (asteina) sekä laskee hypotenuusan pituuden:

Sub ExampleCosinus

REM pyöristetty pii = 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


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit