ravegoat
25-04-08, 21:48
در این مقاله نحوه ی به کار بردن معروف ترین اعمال ریاضی را در ویژوال بیسیک دات نت شرح می دهیم.
معروف ترین اعمال ریاضی در VB.Net در کلاس Math قرار دارند:
(عدد)Math.Abs
حاصل، قدر مطلق عدد
Math.Abs(-1)=1
(عددی بین یک و منفی یک)Math.ACos
حاصل، آرک کسینوس عدد که زاویه ای بر حسب رادیان است
*آرک کوسینوس برابر با معکوس تابع کوسینوس است
ACos(0.5)=Math.PI / 3
(عددی بین یک و منفی یک)Math.ASin
حاصل، آرک سینوس عدد که زاویه ای بر حسب رادیان است
Math.ASin(0.5)=Math.PI / 6
(عدد)Math.ATan
حاصل، آرک تانژانت عدد که زاویه ای بر حسب رادیان است
Math.ATan(1)=Math.PI / 4
(عدد)Math.Ceiling
حاصل، سقف عدد
*سقف عدد برابر است با جز صحیح یک عدد بعلاوه ی یک
Math.Ceiling(3.14)=4
Math.Ceiling(-1.5)=-1
(زاویه بر حسب رادیان)Math.Cos
حاصل، کسینوس زاویه
Math.Cos(Math.PI / 3)=0.5
Math.E
عدد ایی برابر 2.71
(عدد)Math.Floor
حاصل، جز صحیح (کفی یا براکت) عدد
Math.Floor(3.14)=3 [3.14]=3
Math.Floor(-1.5)=-2 [-1.5]=-2
(مبنای لگاریتم, عدد)Math.Log
حاصل، لگارتیم عدد در مبنای داده شده
Math.Log(8, 2)=3
(عدد, عدد)Math.Max
حاصل، عدد بزرگ تر
Math.Max(10, 11)=11
(عدد, عدد)Math.Min
حاصل، عدد کوچک تر
Math.Min(10, 11)=10
Math.PI
عدد پی برابر 3.14
(عدد)Math.Round
حاصل، عدد گرد شده
Math.Round(4.777)=5
Math.Round(7.444)=7
(عدد)Math.Sign
حاصل 0، 1 ویا -1
*تابع تعیین علامت
Math.Sign(-7)=-1
(زاویه بر حسب رادیان)Math.Sin
حاصل، سینوس زاویه
Math.Sin(Math.PI / 6)=0.5
(عدد نا منفی)Math.Sqrt
حاصل، جزر عدد
Math.Sqrt(4)=2
(زاویه بر حسب رادیان)Math.Tan
حاصل، تانژانت زاویه
Math.Tan(Math.PI / 4)=1
(عدد)Math.Truncate
حاصل، مقدار بخش صحیح عدد
Math.Truncate(3.14)=3
Math.Truncate(-1.5)=-1
برخی دیگر از اعمال ریاضی:
ریشه گیری:
(فرجه/1, عدد)Math.Pow
Math.Pow(81, 1/4)=3 ریشه ی چهارم 81
معکوس عدد:
عدد/1
یا عدد را به توان -1 برسانیم
فاکتوریل عدد:
مقدار عدد را برابر یک قرار می دهیم
Try
عدد For Fact as Long = 1 to
عدد*=Fact
Next
Catch
("فاکتوریل عدد برابر بی نهایت است")Msgbox
End Try
مقدار عدد فی:
Dim Fi as Long
Fi = (1 + Math.Sqrt(5)) / 2
به دست آوردن کوتانژانت:
چون تانژانت معکوس کوتانژانت است پس:
Dim Cot as Long
(مقدار زاویه بر حسب رادیان)Cot = 1 / Math.Tan
به دست آوردن آرک کوتانژانت:
Dim ACot as Long
(عدد/ACot = Math.ATan(1
تبدیل رادیان به درجه و بلعکس:
رادیان به درجه:
رادیان * 57.295779513082320876798154814105
درجه به رادیان:
درجه تقسیم بر 57.295779513082320876798154814105
لگاریتم در مبنای 10:
(عدد)Math.Log10
Math.Log10(100)=2
مقدار هگزادسیمال:
(عدد)Hex
Hex(1)=1
نکته:
توابع کلاس Math قدرت تسخیص خطا را دارند:
Math.Log10(-2)=NaN
لگارتیم برای اعداد مثبت تعریف شده است
Math.Tan(Math.PI / 2)=Infinity
تانژانت 90 درجه برابر بی نهایت است
مقدار فاکتوریل برای اعداد 0 تا 20 قابل قبول است. فاکتوریل عدد 21 بسیار بزرگ بوده، به گونه ای که در متغیری از نوع Long هم جای نمی گیرد.
برنامه ی زیر مثال خوبی برای توضیحات بالا است:
دانلود ماشین حساب (فارسی) (Only the registered members can see the link)08 (Only the registered members can see the link)
Only the registered members can see the link
اندازه: 43.7 کیلوبایت
نوع برنامه: فایل اجرایی ویندوز - برنامه ی کاربردی پورتابل
توضیحات: همراه با سورس ویژوال بیسیک دات نت و فونت برنامه
* برای اجرای این برنامه نیاز به نصب dotNetFramework 2.0 بر روی ویندوز دارید.
معروف ترین اعمال ریاضی در VB.Net در کلاس Math قرار دارند:
(عدد)Math.Abs
حاصل، قدر مطلق عدد
Math.Abs(-1)=1
(عددی بین یک و منفی یک)Math.ACos
حاصل، آرک کسینوس عدد که زاویه ای بر حسب رادیان است
*آرک کوسینوس برابر با معکوس تابع کوسینوس است
ACos(0.5)=Math.PI / 3
(عددی بین یک و منفی یک)Math.ASin
حاصل، آرک سینوس عدد که زاویه ای بر حسب رادیان است
Math.ASin(0.5)=Math.PI / 6
(عدد)Math.ATan
حاصل، آرک تانژانت عدد که زاویه ای بر حسب رادیان است
Math.ATan(1)=Math.PI / 4
(عدد)Math.Ceiling
حاصل، سقف عدد
*سقف عدد برابر است با جز صحیح یک عدد بعلاوه ی یک
Math.Ceiling(3.14)=4
Math.Ceiling(-1.5)=-1
(زاویه بر حسب رادیان)Math.Cos
حاصل، کسینوس زاویه
Math.Cos(Math.PI / 3)=0.5
Math.E
عدد ایی برابر 2.71
(عدد)Math.Floor
حاصل، جز صحیح (کفی یا براکت) عدد
Math.Floor(3.14)=3 [3.14]=3
Math.Floor(-1.5)=-2 [-1.5]=-2
(مبنای لگاریتم, عدد)Math.Log
حاصل، لگارتیم عدد در مبنای داده شده
Math.Log(8, 2)=3
(عدد, عدد)Math.Max
حاصل، عدد بزرگ تر
Math.Max(10, 11)=11
(عدد, عدد)Math.Min
حاصل، عدد کوچک تر
Math.Min(10, 11)=10
Math.PI
عدد پی برابر 3.14
(عدد)Math.Round
حاصل، عدد گرد شده
Math.Round(4.777)=5
Math.Round(7.444)=7
(عدد)Math.Sign
حاصل 0، 1 ویا -1
*تابع تعیین علامت
Math.Sign(-7)=-1
(زاویه بر حسب رادیان)Math.Sin
حاصل، سینوس زاویه
Math.Sin(Math.PI / 6)=0.5
(عدد نا منفی)Math.Sqrt
حاصل، جزر عدد
Math.Sqrt(4)=2
(زاویه بر حسب رادیان)Math.Tan
حاصل، تانژانت زاویه
Math.Tan(Math.PI / 4)=1
(عدد)Math.Truncate
حاصل، مقدار بخش صحیح عدد
Math.Truncate(3.14)=3
Math.Truncate(-1.5)=-1
برخی دیگر از اعمال ریاضی:
ریشه گیری:
(فرجه/1, عدد)Math.Pow
Math.Pow(81, 1/4)=3 ریشه ی چهارم 81
معکوس عدد:
عدد/1
یا عدد را به توان -1 برسانیم
فاکتوریل عدد:
مقدار عدد را برابر یک قرار می دهیم
Try
عدد For Fact as Long = 1 to
عدد*=Fact
Next
Catch
("فاکتوریل عدد برابر بی نهایت است")Msgbox
End Try
مقدار عدد فی:
Dim Fi as Long
Fi = (1 + Math.Sqrt(5)) / 2
به دست آوردن کوتانژانت:
چون تانژانت معکوس کوتانژانت است پس:
Dim Cot as Long
(مقدار زاویه بر حسب رادیان)Cot = 1 / Math.Tan
به دست آوردن آرک کوتانژانت:
Dim ACot as Long
(عدد/ACot = Math.ATan(1
تبدیل رادیان به درجه و بلعکس:
رادیان به درجه:
رادیان * 57.295779513082320876798154814105
درجه به رادیان:
درجه تقسیم بر 57.295779513082320876798154814105
لگاریتم در مبنای 10:
(عدد)Math.Log10
Math.Log10(100)=2
مقدار هگزادسیمال:
(عدد)Hex
Hex(1)=1
نکته:
توابع کلاس Math قدرت تسخیص خطا را دارند:
Math.Log10(-2)=NaN
لگارتیم برای اعداد مثبت تعریف شده است
Math.Tan(Math.PI / 2)=Infinity
تانژانت 90 درجه برابر بی نهایت است
مقدار فاکتوریل برای اعداد 0 تا 20 قابل قبول است. فاکتوریل عدد 21 بسیار بزرگ بوده، به گونه ای که در متغیری از نوع Long هم جای نمی گیرد.
برنامه ی زیر مثال خوبی برای توضیحات بالا است:
دانلود ماشین حساب (فارسی) (Only the registered members can see the link)08 (Only the registered members can see the link)
Only the registered members can see the link
اندازه: 43.7 کیلوبایت
نوع برنامه: فایل اجرایی ویندوز - برنامه ی کاربردی پورتابل
توضیحات: همراه با سورس ویژوال بیسیک دات نت و فونت برنامه
* برای اجرای این برنامه نیاز به نصب dotNetFramework 2.0 بر روی ویندوز دارید.