ເນື້ອໃນ

# ຟັງຊັນ Cos

ຄຳນວນຫາຄ່າ ໂຄຊາຍ (cosine) ຂອງມຸມ. ມຸມແມ່ນຖືກລະບຸເປັນເຣດຽນ. ຜົນໄດ້ຮັບຈະຢູ່ໃນຊ່ວງລະຫວ່າງ -1 ຫາ 1.

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

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

### ໄວຍາກອນ:

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

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

Double

### ພາຣາມິເຕີ:

ຕົວເລກ: ສຳນວນຕົວເລກທີ່ລະບຸຄ່າມຸມເປັນເຣດຽນທີ່ທ່ານຕ້ອງການຄຳນວນຫາຄ່າໂຄຊາຍ.

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

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

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

Pi ໃນທີ່ນີ້ແມ່ນຄ່າຄົງທີ່ຂອງວົງມົນທີ່ມີຄ່າປະມານ 3.14159...

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

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

### ຕົວຢ່າງ:

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

ຫົວຂໍ້ທີ່ກ່ຽວຂ້ອງ

ຟັງຊັນ Atn

ຟັງຊັນ Sin

ຟັງຊັນ Tan

ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!