Частина тексту файла (без зображень, графіків і формул):
Написати програму, котра реалізує метод трапецій з автоматичним вибором кроку
При початкових умовах: n=10, ep=1E-6, a=0, b=(;
program trapaut (input, output); for k:=1 to n-1 do i:=i+f(a+k*h);
label l; i:=i*h;
var k,n: integer; end;
x,i,is,a,b,ep: real; begin
function f(x:real): real; writeln(‘введіть a, b, n, ep’);
begin read(a, b, n, ep);
f:=sqr (sin(x))/(1+cos(x)+0.25); tr(a, b, n, i);
end; l: is:=i;
procedure tr(a,b:real; n:integer;var i:real); n:=2*n;
var h:real; k:integer; tr(a, b, n, i);
begin if abs((is-i)/i)>ep then goto l;
h:=(b-a)/n; writeln(‘n=’, n’i=’,is);
i:=(f(a)+f(b))/2; end.
Ви не можете залишити коментар. Для цього, будь ласка, увійдіть
або зареєструйтесь.
Ділись своїми роботами та отримуй миттєві бонуси!
Маєш корисні навчальні матеріали, які припадають пилом на твоєму комп'ютері? Розрахункові, лабораторні, практичні чи контрольні роботи — завантажуй їх прямо зараз і одразу отримуй бали на свій рахунок! Заархівуй всі файли в один .zip (до 100 МБ) або завантажуй кожен файл окремо. Внесок у спільноту – це легкий спосіб допомогти іншим та отримати додаткові можливості на сайті. Твої старі роботи можуть приносити тобі нові нагороди!