محاسبه كسينوس [بایگانی]

A_1397

شنبه 05 آذر 1390, 10:04 صبح

بايد كسينوس يه درجه رو حساب كنم ولي مثلا وقتي توي برنامم دستور cos(45) رو مي نويسم مقدار 0.52 رو نشون ميده در حاليكه مقدار كسينوس 45 درجه 0.7 هستش. مشكل چيه؟

hosein3000

شنبه 05 آذر 1390, 17:42 عصر

با سلام
چون اکثر توابع مثلثاتی بر حسب رادیان کار می کنند به همین علت مقداری که شما برای کسینوس 45 بدست اورید بر حسب رادیان می باشد که برای اینکه این مقدار ها بر حسب درجه بیان بشن باید درجه رو به رادیان تبدیل کنی تا نتیجه بر حسب درجه بدست بیاد. به عنوان مثال می تونی از کد زیر استفاده کنی

Private Sub Command1_Click()
Const Pi = 3.14159265358979
x = (Text1.Text)
b = x * Pi / 180
Label1.Caption = Cos(b)
End Sub