f(x)=6+3cosx 구간은 a = 0 , b = π/2
@ 가상코드 @
(a) 단일구간 Simpson 1/3 공식
function simp13 (h, f0, f1, f2)
simp13 = 2*h* (f0+4*f1+f2) / 6
end simp13
(b) 단일구간 Simpson 3/8 공식
function simp38 (h, f0, f1, f2, f3)
simp38 = 3*h* (f0+3*(f1+f2)+f3) / 8
end simp38
(c) 복합구간 Simpson 1/3 공식
function simp13m ( h, n, f)
sum = f(0)
dofor i = 1, n-2, 2
sum = sum + 4 * fi + 2 * fi+1
end do
sum = sum + 4 * fn-1 + fn
simp13m = h * sum / 3
end simp13m
(d) 구간수가 짝수 및 홀수인 경우를 위한 복합구간 Simpson 3/8공식
function simpint(a, b, n, f)
h = (b - a) / n
if n = 1 then
sum = trap(h, fn-1, fn)
else
m = n
odd = n / 2 - int(n / 2)
if odd > 0 and n > 1 then
sum = sum+simp38(h, fn-3, fn-2, fn-1, fn)
m = n-3
end if
if m > 1 then
sum = sum + simp13m(h, m , f)
end if
end if
simpint = sum
end simpint
위의 가상코드를 토대로 해서 프로그램을 짜주세요. 복잡한거 절대 필요없어요.
그냥 입력부만 넣어서 적분값만 알수 있게만 짜주세요. 최대한 간결간단하게 해주세요ㅠ
잡담 | 2237명이 읽었어요. 3.14.253.152
