Cos Function

ཟུར་ཚད་ཅིག་གི་ལྷག་རྒྱུད་ཐང་རྩིས་རྒྱག་དགོས་ ཟུར་ཚད་ཀྱི་འཇལ་བྱེད་ནི་གཞུ་ཚད་ཡིན་ འབྲས་བུ་ནི་ -1 ནས་ 1 བར་ཡིན།

Using the angle Alpha, the Cos function calculates the ratio of the length of the side that is adjacent to the angle, divided by the length of the hypotenuse in a right-angled triangle.

Cos(Alpha) = Adjacent/Hypotenuse

Syntax:


Cos (Number As Double) As Double

Return value:

ཆ་ལྡན་དག་ཚད་

Parameters:

Number ལྷག་རྒྱུད་ཐང་གི་ཟུར་ཚད་རྩིས་རྒྱག་གི་གྲངས་ཀའི་མཚོན་ཚུལ་གཏན་འཁེལ་ལ་སྤྱོད་ འཇལ་བྱེད་ནི་གཞུང་ཚད་ཡིན།

ཚད་ནི་གཞུ་ཚད་ལ་བརྗེ་སྒྱུར་བྱེད་ན་ ཏུའུ་ལ་ pi/180བསྒྱུར་དགོས། གཞུ་ཚད་ནི་ཏུའུ་ལ་བརྗེ་སྒྱུར་བྱེད་ན་གཞུ་ཚད་ལ་ 180/piཡིས་བསྒྱུར་དགོས།

ཏུའུ་=(གཞུ་ཚད་*180)/pi

གཞུ་ཚད་=(ཏུའུ་*pi)/180

Pi is here the fixed circle constant with the rounded value 3.14159...

Error codes:

5 ནུས་མེད་ཀྱི་བརྒྱུད་རིམ་འཁོར་སྤྱོད་

Example:


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

Please support us!