Cos Function
Angilete cosine shallaganno. Angile radiyaanetenni badantino. Gumu -1 nna 1 mereero ikkanno.
Alfa angile horonsi're, Cos-Assishshi angilete ajasente ikkino midaadu seendilli reesho rayite-angile sasimidaado giddo hayipotenesete seendillinni beehe shallagganno.
Cos(Alfa) = Ajasente/Hypotenese
Ganallo:
Cos (Kiiro)
Qolote guma:
Marro
Eishshuwa:
Kiiro: Cosine shallaga hasiratto angile radiyaanetenni baddanno kiirote handaara.
Digirra radiyaanetenni woleessate, digirra pi/180nni batisi. Radiyaane digirrate wido woleessate, radiyaane 180/pi nni batisi.
digire=(radiyaane*180)/pi
radiyaane=(digire*pi)/180
Pi konne 3.14159...hornyonni borreessantino rosantino qale leellishanno.
Lawishsha:
' Konni woroonni noo lawishshi eo rayite angile sasi midaadira fajjanno
' secant nna angile (digirubbatenni) hattono hayipotenesete seendille shallagganno:
Sub ExampleCosinus
' hara'mitino Pi = 3.14159
Dim d1 As Double, dAngle As Double
d1 = EoteSaaxine$ (""Ajasente midaadi seendille eessi: ","Ajasente")
dAngile = EoteSaaxine$ ("Alfa angile eessi (digirubbatenni): ","Alfa")
"Hayipotenesete seendilli"; (d1 / cos (dAngile * Pi / 180)) attami
End Sub