مهندسی عمران راه و ساختمان
ایجاد ارتقاء دانش فنی مهندسی ( عمران )

 
تاريخ : یکشنبه ۶ تیر ۱۳۹۵
روش نابجایی(کد فرترن)

عضویت در کانال و سوپر گروه مهندسین راه و ساختمان

http://telegram.me/joinchat/BULTFT3mvgx-z6Vq3rLs3Q

http://telegram.me/joinchat/CivilStructure_Surveying

نقل قول :

کد فرترن روش نابجایی ... این کد را برای تابع مثالی   x^2 - 2^x  نوشته است. کدی که نوشته شده است اول بازه a و b را میگیرد.همان طور که میدونید در روش نابجایی اول باید بازه را وارد کنید!حدس اولیه را 0 قرار داده است. بعد نرخ همگرایی را میگیرد و در هر مرحله خطا را نسبت به جواب مرحله قبل محاسبه میکنه و با نرخ همگرایی که وارد کرده اید مقایسه میکند.در آخر اگر خطا کمتر از نرخ همگرایی بود جواب را همراه با تعداد تکرار نشان میدهد.…
program nabejayi
implicit none
INTEGER::k
REAL::a,b,fa,fb,x,e,c,y
!F(x)=x^2 - 2^x
PRINT*
PRINT*,"   F(X) = X^2 - 2^X        X = ? "
PRINT*
PRINT*,"   Baraye baze [a,b],  a & b ra vared konid : "
در ادامه مطلب
بازگشت به صفحه اصلی وبلاگ مهندسی عمران راه و ساختمان
منبع

برچسب‌ها: روش نابجایی, کد فرترن, محاسبات عددی

ادامه مطلب...
ارسال توسط حسن فراهانی

مطالعه آنلاین کد برنامه نویسی به زبان سی(روش نابجایی)

این کد ریشه تابع  

f(x)=cosx-x^3=0

   رو تقریب میزنه. الگوریتم به زبان C پیاده‌ سازی شده است.


  1. #include
  2. #include
  3.  
  4. double f(double x)
  5. {
  6. return cos(x) - x*x*x;
  7. }
  8.  
  9. double FalsiMethod(double s, double t, double e, int m)
  10. {
  11. int n,side=0;
  12. double r,fr,fs = f(s),ft = f(t);
  13.  
  14. for (n = 1; n <= m; n++)
  15. {
  16. r = (fs*t - ft*s) / (fs - ft);
  17. if (fabs(t-s) < e*fabs(t+s)) break;
  18. fr = f&reg;;
  19.  
  20. if (fr * ft > 0)
  21. {
  22. t = r; ft = fr;
  23. if (side==-1) fs /= 2;
  24. side = -1;
  25. }
  26. else if (fs * fr > 0)
  27. {
  28. s = r; fs = fr;
  29. if (side==+1) ft /= 2;
  30. side = +1;
  31. }
  32. else break;
  33. }
  34. return r;
  35. }
  36.  
  37. int main(void)
  38. {
  39. printf("%0.15f\n", FalsiMethod(0, 1, 5E-15, 100));
  40. return 0;
  41. }

برای دانلود جزوه آنالیز عددی یک دکتر رشیدی اینجا کلیک کنید...

http://www.iust.ac.ir/files/math/numerical_analysis_1.pdf

برای دانلود جزوه آنالیز عددی دو دکتر رشیدی اینجا کلیک کنید...

http://www.iust.ac.ir/files/math/numerical_analysis_2.pdf

منبع : سیویل استارز


برچسب‌ها: مطالعه آنلاین, کد برنامه نویسی, زبان سی, روش نابجایی

ارسال توسط حسن فراهانی

اسلایدر