Atn Function
ཟུར་གསུམ་རྩིས་རིག་གི་ལས་འགན་གྱིས་ཨག་ཊན་ཇིནཊི་གི་ཨང་གྲངས་ཀྱི་གསལ་བརྗོད་དེ་སླར་་ལོགཔ་ཨིན། སླར་ལོག་གནས་གོང་དེ་ཁྱབ་ཚད་ -པི་ཨའི/༢ ལས་ +པི་ཨའི་/༢ ནང་ཨིན།
ཨག་ཊེན་ཇེནཊི་དེ་ཊེན་ཇེནཊི་ལས་འགན་གྱི་ལུགས་ལྡོགས་ཨིན། ཨེ་ཊི་ཨེན་ལས་འགན་གྱིས་གྲུ་ཟུར་ "Alpha" རེ་ཌི་ཡཱནསི་ནང་ཊེན་ཇེནཊི་གི་གྲུ་ཟུརལག་ལེནའཐབ་དེ་གསལ་བརྗོད་ཡོད་མི་དེ་སླར་ལོགཔ་ཨིན། ལས་འགན་དེ་གིས་ཡང་གྲུ་ཟུར་ "Alpha"རིང་ཚད་གྱི་ཟུར་གྲུ་ཟུར་གྱི་རྒྱབ་འགལ་རིང་ཚད་ཀྱི་ཟུར་ལུ་གཡས་ཕྱོགས་གྲུ་ཟུར་ ཟུར་གསུམ་གྱི་གྲུ་ཟུར་ཉེས་འདབ་ལུ་ག་བསྡུར་འབད་དེ་སླར་ལོག་བཏུབ་ཨིན།
ཨེཨཨཨཊིཨེན་(side opposite the angle/side adjacent to angle)= ཨལ་ཕ།
ཚིག་སྦྱོར:
ཨེཊིཨེན (Number)
གནས་གོང་སླར་ལོག:
ལོག་ལྟབ།
ཚད་བཟུང་ཚུ་:
ཨང་: ཨང་གྲངས་ཅན་གྱི་གསལ་བརྗོད་གང་རུང་དེ་གིས་གཡས་ཕྱོགས་ཟུར་གསུམ་ཅིག་གི་ཟུར་གཉིས་ཀྱི་དཔྱ་ཚད་དེ་ཁྱད་ཚབ་འབདཝ་ཨིན། ཨེ་ཊི་ཨེན་ལས་འགན་གྱིས་རེ་ཌི་ཡཱནསི་ནང་ཆ་མཉམ་པའི་གྲུ་ཟུར་ (arctangent)དེ་སླར་ལོགཔ་ཨིན།
རེ་ཌི་ཡཱནསི་དབྱེ་རིམ་ལུ་གཞི་བསྒྱུར་འབད་ནི་ལུ་ ༡༨༠/པི་ཨའི་གིས་འབད་རེ་ཌི་ཡཱནསི་དགུ་མཐའ་རྐྱབས།
དབྱེ་རིམ=(radian*180)/pi
རེ་ཌི་ཡན=(degree*pi)/180
པི་ཨའི་ན་ལུ་དེ་གཏན་བཟོ་སྒོར་ཐིག་གི་གནས་གོང་ ༣་༡༤༡༥༩ གིས་སྐོར་ཡོདཔ་ཨིན།
དཔེར་བརྗོད:
ཨར་ཨི་ཨེམ་ འོག་གི་དཔེར་བརྗོད་ཀྱིས་གཡས་གྲུ་ཟུར་་ཕྱོགས་གཉིས་མཉམ་པའི་ཟུར་གསུམ་མ་གི་དོན་ལུ་རྩིས་སྟོནམ་ཨིན།
ཨར་ཨི་ཨེམ་ གྲུ་ཟུར་ཨཱལ་ཕ་དེ་གྲུ་ཟུར་ཨཱལ་ཕ་གི་ཊེན་ཇེནཊི་ལས་ཨིན:
Sub ExampleAtn
ཨར་ཨི་ཨེམ་ པི་ཨའི་སྐོར་ཐེངས་ཡོདཔ་ = ༣་༡༤༡༥༩ དེ་སྔ་སྒོང་ངེས་འཛིན་འབད་ཡོད་པའི་ཆད་མེད།
Dim d1 As Double
Dim d2 As Double
ཌི་ ༡ = ཨིན་པུཊི་སྒྲོམ$ ("Enter the length of the side adjacent to the angle: ","Adjacent")
ཌི་ ༢ = ཨིན་པུཊི་སྒྲོམ$ ("Enter the length of the side opposite the angle: ","Opposite")
དཔར་བསྐྲུན་འབད། "The Alpha angle is"; (atn (d2/d1) * 180 / Pi); " degrees"
End Sub