+ Trả lời chủ đề
Hiện kết quả từ 1 tới 2 của 2

Chủ đề: Công thức Simpson tính gần đúng tích phân xác định

  1. #1
    Status : ThanhTuan_Alpha đang ẩn
    Tham gia ngày : Aug 2011
    Bài gửi : 203

    Công thức Simpson tính gần đúng tích phân xác định

    Công thức Simpson tính gần đúng tích phân xác định


    Mã:
    Clear[f, n, h, L, Tp];
    f[x_] = Input["Nhap ham so y = f(x)"];
    Print["y = ", f[x]];
    n = Input["Nhap so doan chia"];
    h = (b - a)/(2 n);
    L = Table[f[a + i h], {i, 0, 2 n}];
    Tp = (h/3)(L[[1]] + L[[2 n + 1]] + 4 
    Sum[L[[i]], {i, 2, 2n, 2}] + 2 Sum[L[[j]], {j, 3, 2n - 1, 2}]);
    Print["Cong thuc Simpson cho I = ", N[Tp]];

  2. #2
    Status : ThanhTuan_Alpha đang ẩn
    Tham gia ngày : Aug 2011
    Bài gửi : 203

    Công thức hình thang tính gần đúng tích phân xác định

    Công thức hình thang tính gần đúng tích phân xác định

    Mã:
    Clear[n, a, b, f, S];
    f[x_] = Input["Nhap ham so y = f(x)"];
    n = Input["Nhap so doan can chia"];
    a = Input["Nhap can duoi cua tich phan"];
    b = Input["Nhap can tren cua tich phan"];
    h = (b - a)/n;
    S = (h/2)(f[a] + f[b] + 2 Sum[f[a + i h], {i, 1, n - 1}]);
    Print["Tich phan cua f(x) = ", f[x], " tu ", a, " den ", b , " la: ", S];

+ Trả lời chủ đề

Quyền viết bài

  • Bạn không thể gửi chủ đề mới
  • Bạn không thể gửi trả lời
  • Bạn không thể gửi file đính kèm
  • Bạn không thể sửa bài viết của mình
Trang Chủ Việc Làm Gia Sư Gia sư