مشکل در توابع ریاضی

[marzbannia]

با سلام
من با توابع مثلثاتی در vb مشکل دارم با اینکه مقدار داده ورودی را به رادیان تبدیل میکنم اما جواب درستی را نمی گیرم مثلا atan1=45 ام من
جواب را1.74515206514658E-02 میگیرم


(a = Val(Text1.Text * (3.1415926535898 / 180)
(k1 = Math.Atn(a
Text2.Text = k1

با تابع arccos هم مشکل دارم

[saber187518]

با سلام دوست عزیز
اگه اشتباه نکرده باشم تابه arctan عدد میگیره و زاویه پس میده.
نباید رادیان بهش بدید.
همچنین arccos هم به همین شکل.

[MahmoudiNik]

سلام
اگر جواب میشه 0.665773750028354 این کد رو امتحان کنید؟



MsgBox(Math.Atan((CDbl(Val(TextBox1.Text) * (Math.PI / 180)))))

احتمالا جنس متغیر هاتون باشه!:متفکر:نمیدونم من کد شمارو امتحان کردم ولی بازم عدد بالا رو میداد!!

[nima898]

سلام
اگر جواب میشه 0.665773750028354 این کد رو امتحان کنید؟


کد:
MsgBox(Math.Atan((CDbl(Val(TextBox1.Text) * (Math.PI / 180)))))

همونطور که دوستمون saber187518 (http://barnamenevis.org/forum/member.php?u=107260) گفت ورودی arctan عدده نه زاویه که بخوایم درجه بدیم یا زاویه.
خروجیه arctan زاویه هست که میشه به درجه یا رادیان نمایش داد


atan(1)=0.78539816339744830961566084581988 بر حسب رادیان
atan(1)=45 بر حسب درجه
atan(1)=50 بر حسب گرادیان