Tan Function

གྲུ་ཟུར་ཅིག་གི་ཊེན་ཇེནཊི་འདི་གཏན་འབེབས་བཟོཝ་ཨིན། གྲུ་ཟུར་འདི་འོད་ཅན་ནང་གསལ་བཀོད་འབད་དེ་ཡོདཔ་ཨིན།

གྲུ་ཟུར་ཨཱལ་ཕ་ལག་ལེན་འཐབ་དེ་ ཊི་ཡན་ལས་འགན་གྱིས་གཡས་ཕྱོགས་གྲུ་ཟུར་ ཟུར་གསུམ་ནང་གྲུ་ཟུར་ལུ་ཉེས་འདབས་ཟུར་གྱི་རིང་ཚད་ལུ་ཟུར་རྒྱབ་འགལ་གྲུ་ཟུར་གྱི་རིང་ཚད་ཀྱི་དཔྱ་ཚད་དེ་རྩིས་སྟོནམ་ཨིན།

ཊེནpha) = གྲུ་ཟུར་འདི་རྒྱབ་འགལ་ཕྱོགས/ གྲུ་ཟུར་ལུ་ཨེཌིཇེ་ཡན་ཊི་ཕྱོགས།

ཚིག་སྦྱོར:

ཊན (Number)

གནས་གོང་སླར་ལོག:

ལོག་ལྟབ།

ཚད་བཟུང་ཚུ་:

ཨང་: ཨང་གྲངས་ཀྱི་གསལ་བརྗོད་གང་རུང་འདི་ཁྱོད་ཀྱིས་ཊེན་ཇེན་ཊི་དོན་ལུ་ (རེ་ཌི་ཡནསི་ནང་)རཙིས་སྟོན་འབད་ནི་ཡོདཔ་ཨིན།

དབྱེ་རིག་རེ་ཌི་ཡཱནས་ལུ་གཞི་བསྒྱུར་འབད་ནི་ལུ་ པི་ཨའི་/༡༨༠ གིས་འབད་དགུ་བསྡོམས་རྐྱབས། རེ་ཌི་ཡཱནསི་དབྱེ་རིག་ལུ་གཞི་བསྒྱུར་འབད་ནི་ལུ་ ༡༨༠/པི་ཨའི་གིས་འབད་དགུ་བསྡོམས་རྐྱབས།

ཁུག་ཟུར་=(radiant*180)/Pi

འོད་ཅན་=(degrees*Pi)/180

པི་ཨའི་འདི་ཧ་ལམ་ ༣་༡༤༡༥༩༣

དཔེར་བརྗོད:

ཨར་ཨི་ཨེམ་ འ་ནི་དཔེར་བརྗོད་ནང་ འོག་གི་ཐོ་བཀོད་དེ་ གཡས་ཕྱོགས་གྲུ་ཟུར་ ཟུར་གསུམ་དོན་ལུ་ཚུགསཔ་ཨིན:

ཨར་ཨི་ཨེམ་ གྲུ་ཟུར་་དང་གྲུ་ཟུར་(དབྱེ་རིམ་ནང་)གྱི་རྒྱབ་འགལ་ཟུར་གྱི་གྲུ་ཟུར་ལུ་ཉེས་འདབས་ཀྱི་རིང་ཚད་དེ་རྩིས་སྟོན་ནི་ལུ:

Sub ExampleTangens

རིམ་ པི་ཨའི་ = ༣་༡༤༡༥༩༢༦ འདི་སྔོན་གོང་ངེས་འཛིན་འབད་ཡོདཔ་འགྱུར་ཅན།

Dim d1 As Double

Dim dAlpha As Double

    ཌི་ ༡ = ཨིན་པུཊི་སྒྲོམ$ ("Enter the length of the side opposite the angle: ","opposite")

    ཌི་ཨལ་ཕ = ཨིན་པིཊི་སྒྲོམ$ ("Enter the Alpha angle (in degrees): ","Alpha")

    དཔར་བསྐྲུན་འབད "the length of the side adjacent the angle is"; (d1 / tan (dAlpha * Pi / 180))

End Sub