Добавил:
Angel_of_Death
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:MatLab / Simpson
.m function I = Simpson(x)
I = 0;
h = x(2) - x(1);
for i = 2:1:length(x)
I = I + (f(x(i))+4*f(x(i)-h/2)+f(x(i-1)))*h/6;
end
end
I = 0;
h = x(2) - x(1);
for i = 2:1:length(x)
I = I + (f(x(i))+4*f(x(i)-h/2)+f(x(i-1)))*h/6;
end
end