Вычисление косинуса в программе "Калькулятор" - VB

Узнай цену своей работы

Формулировка задачи:

Добрый день, вот сделал калькулятор. Возникли сложности с косинусом. Синус считает корректно а вот косинус выдает не те значения. Нашел одну тему с похожим вопросом Код для вычисления синуса или косинуса заданного угла в градусах, сделал так как написано там(Угол(в радианах)=угол(в градусах)*pi/180, где pi=3.14159265358979.), но косинус считается не корректный если сравнивать с калькулятором windows. Выдает либо 1 в любом случае, не зависимо какое число, или просто выдает не то.

Решение задачи: «Вычисление косинуса в программе "Калькулятор"»

textual
Листинг программы
s = Cos(Val(Text1.Text) * 3.1415926535 / 180)
Text1.Text = s
MsgBox s, , "S="

Оцени полезность:

12   голосов , оценка 3.667 из 5
Похожие ответы