Module
Contents
Index 🔎︎

# Tan Function

ཟུར་ཚད་ཅིག་གི་དྲང་ཕྲད་ཐང་རྩིས་རྒྱག་པ། ཟུར་ཚད་ཀྱི་སྡེ་ཚན་ནི་གཞུ་ཚད་ཡིན།

ཟུར་ Alpha དཔེར་མཚོན་ན་ དྲང་ཟུར་ཟུར་གསུམ་དབྱིབས་ནང་ Tan རྟེན་གྲངས་ཀྱིས་ Alpha ཡི་གཏད་ཟུར་དང་མཚེས་མཐའི་རིང་ཚད་ཀྱི་སྡུར་བ་རྩིས་རྒྱག་པ།

Tan(Alpha) = གཏད་ཟུར་/མཚེས་མཐའ་

## བརྡ་འཕྲོད་

    Tan (Number)

## ཕྱིར་ལོག་ཐང་

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

## ཁུགས་གྲངས་

Number ལྡོག་པའི་དྲང་ཕྲད་ཐང་གི་རྩིས་རྒྱག་པའི་གྲངས་གང་རུང་གི་མཚོན་ཚུལ་ (འཇལ་བྱེད་ནི་གཞུ་ཚད་ཡིན་)

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

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

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

Pi ཡི་ཉེ་མཚུངས་ཐང་ནི་ 3.141593ཡིན།

## Error codes:

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

## དཔེ་གཞི་

    ཚོན་དཔེ་REM འདིའི་ནང་ནང་གཤམ་གྱི་རྣམ་གྲངས་ཚང་མ་ཐད་ཟུར་ཟུར་གསུམ་ལ་དམིགས་པ་ཡིན་

    REM ཟུར་གྱི་གཏད་མཐའ་དང་ཟུར་ཚད་ (འཇལ་བྱེད་ནི་ཏུའུ་ཡིན་)མ་ཟད་དེ་དག་གཞིར་བཟུང་ནས་ཟུར་གྱི་མཚམས་མཐའི་རིང་ཚད་རྩིས་རྒྱག་པ།

    Sub ExampleTangens

    REM Pi = 3.1415926 སྔོན་མཚན་འཇོག་འགྱུར་ཚད་ཡིན་

    Dim d1 As Double

    Dim dAlpha As Double

        d1 = InputBox("Enter the length of the side opposite the angle:","opposite")

        dAlpha = InputBox("Enter the Alpha angle (in degrees):","Alpha")

        Print "the length of the side adjacent the angle is"; (d1 / tan (dAlpha * Pi / 180))

    End Sub