Mundarija kirish aniq integrallarni taqribiy hisoblash. Eng sodda interpolyatsion kvadratur formula to‘G’ri to‘rtburchaklar formulasi trapetsiyalar formulasi

'IF FNZ1(XT(I), YT(I)) <= Z(I) <= FNZ2(XT(I), YT(I)) THEN N2 = N2 + 1: XTT(N2) = XT(I): YTT(N2) = YT(I): ZT(N2) = Z(I)
NEXT I
PRINT " Z1(I) <= Z(I) <= Z2(I) SHART BO'YICHA Z(I)LAR SONI N2="; N2
FOR I = 1 TO N2
IF U(I) < FNF(XTT(I), YTT(I), ZT(I)) THEN N3 = N3 + 1: UT(N3) = U(I)
NEXT I
PRINT "U(I)
FOR I = 1 TO N3
PRINT USING "###.#####"; XTT(I); YTT(I); ZT(I); UT(I); FNF(XTT(I), YTT(I), ZT(I))
'S = S + FNF(XTT(I), YTT(I), ZT(I))
NEXT I
W = (B - A) * (D - C) * (H - G): PRINT "W="; W
S1 = W * N3 * M / N: PRINT " S1="; S1
END
N=? 20
A
C= 0 d= 3
G= 1 h= 9
M= 24
XI YI ZI Y1(I) Y2(I) Z1(I) Z2(I)
2.74289 0.16871 8.59645 0.00000 2.74289 2.91160 3.08031
2.04974 2.30133 1.42804 0.00000 2.04974 4.35107 6.65241
1.93740 0.89450 5.98157 0.00000 1.93740 2.83190 3.72639
1.52759 0.83803 7.63841 0.00000 1.52759 2.36561 3.20364
2.17833 2.95828 8.28771 0.00000 2.17833 5.13661 8.09488
2.39023 2.94001 2.95145 0.00000 2.39023 5.33024 8.27025
1.21274 2.99824 6.40941 0.00000 1.21274 4.21098 7.20923
2.15037 0.30016 1.82418 0.00000 2.15037 2.45052 2.75068
1.56896 0.13695 3.36618 0.00000 1.56896 1.70591 1.84286
1.60194 2.84571 8.83863 0.00000 1.60194 4.44765 7.29337
1.55656 0.48132 2.30257 0.00000 1.55656 2.03788 2.51921
1.82015 1.23830 6.70184 0.00000 1.82015 3.05845 4.29675
2.26636 0.62268 2.48811 0.00000 2.26636 2.88904 3.51172
1.16143 1.37391 8.24584 0.00000 1.16143 2.53534 3.90926
2.57042 1.13671 3.31732 0.00000 2.57042 3.70713 4.84384
2.26348 1.88293 4.42765 0.00000 2.26348 4.14641 6.02934

Y1(i) <= y(i) <= y2(i) shart bo'yicha y(i)lar soni N1= 13

Z1(i) <= z(i) <= Z2(i) shart bo'yicha z(i)lar soni N2= 1
U(i)
Xtt(i) ytt(i) zt(i) ut(i) FNF(xtt, ytt,zt)
1.21274 2.99824 6.40941 6.94950 17.02980
w= 48
S1= 57.6
Yuqoridagilarga tayangan holda Maple 7 da va Basic tilidan olingan natijalar aniq yechimga qanchalik yaqinligini topamiz: