ВАШЕ СВИДЕТЕЛЬСТВО
О ПУБЛИКАЦИИ В СМИ И РЕЦЕНЗИЯ
бесплатно за 1 минуту
Добавить материал
Количество Ваших материалов: 0.
Авторское свидетельство о публикации в СМИ
нужно еще 1
Свидетельство
о создании эл. портфолио
нужно еще 5
Секретный
подарок
нужно еще 10
Грамота за
информатизацию образования
нужно еще 12
Рецензия
на любой материал бесплатно
нужно еще 15
Мария Забелина Свидетельство о публикации Рецензия
Свидетельство Скачивание доступно только автору
Методом половинного деления найти корень уравнения x-Cos(x)=0.

Методом половинного деления найти корень уравнения x-Cos(x)=0.

Методом половинного деления найти корень уравнения x-Cos(x)=0. а) открыть новый файл и набрать текст программы: PROGRAM P9; FUNCTION FUN(A:REAL):REAL; BEGIN FUN:=A-COS(A); END; VAR A,B,X:REAL; BEGIN WRITELN('Ввести интервал А и В для поиска корня = ’); READLN(A,B); REPEAT X:=0.5*(A+B); IF FUN(X)*FUN(A)<0 THEN B:=X ELSE A:=X; UNTIL ABS(A-B)<1E-4; WRITELN(’ Корень уравнения ’,X); END. б) выполнить программу щелчком по соответствующей кнопке меню или клавишей F9;

  • Карточки-задания
  • Информатика
  • 10 кл.
  • 11 кл.

Все файлы материала: