[سوال] محاسبه مقدار سینوس و کسینوس زاویه

شروع موضوع توسط mahdigh ‏24 جولای 2011 در انجمن برنامه Multimedia Builder

  1. mahdigh

    mahdigh Member

    ارسال‌ها:
    59
    تشکر شده:
    16
    امتیاز دستاورد:
    6
    با تشکر لطف کنید روشی برای محاسبه ی مقدار سینوس و کسینوس زاویه بدون استفاده از پلاگین رو بگید. البته خودم مقداری فکر کردم که بتونم با استفاده از دنباله ها و حلقه ها این کار رو کنم ولی ...
    لطفا کمک کنید.
     
    نوشته شده توسط mahdigh در ‏24 جولای 2011
  2. the_king

    the_king مدیرکل انجمن

    ارسال‌ها:
    9,976
    تشکر شده:
    9,871
    امتیاز دستاورد:
    113
    نمیشه، امکان نداره :green:
    محاسبه کردن Sin مقدار متغیر x تا 12 رقم بعد از اعشار بر حسب رادیان، نتیجه در متغیر d خواهد بود :
    کد (Text):

    x = 0.5
    dblpi = 6.28318530717959
    If (x > dblpi) Then
      x = x - INT(x / dblpi) * dblpi
    Else
      If (x < -dblpi) Then
        x = x + INT(-x / dblpi) * dblpi
      End
    End
    a = 1
    b = x
    c = 1
    j = 1
    d = 0
    For i = 0 To 80
      d = d + (a / c) * b
      a = -a
      b = b * x * x
      j = j + 2
      c = c * (j - 1) * j
    Next i
    s$ = 'Sin(' + CHAR(x) + ') = ' + CHAR(d)
    Message("s$","")
     
    یادتون باشه که اگر می خواهید با درجه کار کنید، برای تبدیل درجه y به رادیان x از فرمول زیر استفاده کنید :
    کد (Text):

    y = 45
    x = (y / 180) * 3.14159265358979
     
    حالا می توانید Sin رو محاسبه کنید، محاسبه کردن Cos از روی Sin هم که خیلی ساده است، اگر
    می خواهید (Cos(x را حساب کنید، اول کد زیر رو اجرا کنید تا مقدار x تغییر کنه و بعد همان کد محاسبه کردن (Sin(x
    را اجرا کنید :
    کد (Text):

    x = 1.5707963267949 - x
     
    آنچه بدست می آید مقدار Cos همان x اولیه است.
     
    نوشته شده توسط the_king در ‏25 جولای 2011
    mahdigh، m javad، BlueMMB و 4 نفر دیگر از این ارسال تشکر کرده اند.

به اشتراک بگذارید