Методом трапеций найти значение интеграла функции

  • Карточки-задания
  • docx
  • 10.05.2017
Публикация на сайте для учителей

Публикация педагогических разработок

Бесплатное участие. Свидетельство автора сразу.
Мгновенные 10 документов в портфолио.

Методом трапеций найти значение интеграла функции x-Cos(x) в пределах от 0 до 2. а) открыть новый файл и набрать текст программы: PROGRAM P10; FUNCTION FUN(X:REAL):REAL; BEGIN FUN:=X-COS(X); END; VAR H,X,Y,A,B:REAL; I,N:INTEGER; BEGIN WRITELN(’Ввести данные A(0),B(2),N(1000) = ’); READ(A,B,N); X:=0; Y:=0; H:=(B-A)/N; FOR I:=1 TO N-1 DO BEGIN X:=X+H; Y:=Y+FUN(X); END; Y:=H/2*(FUN(A)+FUN(B)+2*Y); WRITELN(’Результат= ’,Y); END. б) выполнить программу щелчком по соответствующей кнопке меню или клавишей F9;
Иконка файла материала Документ Microsoft Office Word.docx
Методом трапеций найти значение интеграла функции x­Cos(x) в  ЗАДАНИЕ 10 пределах от 0 до 2. а) открыть новый файл и набрать текст программы: PROGRAM P10; FUNCTION FUN(X:REAL):REAL; BEGIN FUN:=X­COS(X); END; VAR H,X,Y,A,B:REAL; I,N:INTEGER; BEGIN WRITELN(’Ввести данные A(0),B(2),N(1000) = ’); READ(A,B,N); X:=0; Y:=0; H:=(B­A)/N; FOR I:=1 TO N­1 DO BEGIN X:=X+H; Y:=Y+FUN(X); END; Y:=H/2*(FUN(A)+FUN(B)+2*Y); WRITELN(’Результат= ’,Y); END. б) выполнить программу щелчком по соответствующей кнопке меню или  клавишей F9;в) ввести через клавишу Enter в строку ввода три числа и наблюдать  результат.