ຟັງຊັນ Tan

ຫາຄ່າ ແທນເຈັນ (tangent) ຂອງມຸມ. ມຸມແມ່ນຖືກລະບຸເປັນເຣດຽນ.

ໂດຍໃຊ້ຄ່າມຸມ Alpha, ຟັງຊັນ Tan ຈະຄຳນວນຫາອັດຕາສ່ວນຂອງຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມ ກັບ ຄວາມຍາວຂອງຂ້າງຕິດມຸມ ໃນຮູບສາມແຈສາກ.

Tan(Alpha) = ຂ້າງກົງຂ້າມມຸມ/ຂ້າງຕິດມຸມ

ໄວຍາກອນ:


Tan (ຕົວເລກ As Double) As Double

ປະເພດຄ່າທີ່ສົ່ງກັບ:

Double

ພາຣາມິເຕີ:

ຕົວເລກ: ສຳນວນຕົວເລກໃດໜຶ່ງທີ່ທ່ານຕ້ອງການຄຳນວນຫາຄ່າແທນເຈັນ (ເປັນເຣດຽນ).

ເພື່ອແປງອົງສາເປັນເຣດຽນ, ໃຫ້ຄູນດ້ວຍ Pi/180. ເພື່ອແປງເຣດຽນເປັນອົງສາ, ໃຫ້ຄູນດ້ວຍ 180/Pi.

ອົງສາ=(ເຣດຽນ*180)/Pi

ເຣດຽນ=(ອົງສາ*Pi)/180

Pi ມີຄ່າປະມານ 3.141593.

ລະຫັດຂໍ້ຜິດພາດ:

5 ການເອີ້ນໃຊ້ໂປຣຊີເຈີບໍ່ຖືກຕ້ອງ

ຕົວຢ່າງ:


' ໃນຕົວຢ່າງນີ້, ສາມາດປ້ອນຂໍ້ມູນຕໍ່ໄປນີ້ສຳລັບຮູບສາມແຈສາກ:
' ຂ້າງກົງຂ້າມມຸມ ແລະ ມຸມ (ເປັນອົງສາ) ເພື່ອຄຳນວນຫາຄວາມຍາວຂອງຂ້າງຕິດມຸມ:
Sub ExampleTangens
' Pi = 3.1415926 ແມ່ນຕົວປ່ຽນທີ່ກຳນົດໄວ້ລ່ວງໜ້າ
Dim d1 As Double
Dim dAlpha As Double
    d1 = InputBox("ປ້ອນຄວາມຍາວຂອງຂ້າງກົງຂ້າມມຸມ: ","ຂ້າງກົງຂ້າມມຸມ")
    dAlpha = InputBox("ປ້ອນຄ່າມຸມ Alpha (ເປັນອົງສາ): ","Alpha")
    Print "ຄວາມຍາວຂອງຂ້າງຕິດມຸມແມ່ນ"; (d1 / tan (dAlpha * Pi / 180))
End Sub

ຟັງຊັນ Atn

ຟັງຊັນ Cos

ຟັງຊັນ Sin