Банк рефератов содержит более 364 тысяч рефератов, курсовых и дипломных работ, шпаргалок и докладов по различным дисциплинам: истории, психологии, экономике, менеджменту, философии, праву, экологии. А также изложения, сочинения по литературе, отчеты по практике, топики по английскому.
Полнотекстовый поиск
Всего работ:
364139
Теги названий
Разделы
Авиация и космонавтика (304)
Административное право (123)
Арбитражный процесс (23)
Архитектура (113)
Астрология (4)
Астрономия (4814)
Банковское дело (5227)
Безопасность жизнедеятельности (2616)
Биографии (3423)
Биология (4214)
Биология и химия (1518)
Биржевое дело (68)
Ботаника и сельское хоз-во (2836)
Бухгалтерский учет и аудит (8269)
Валютные отношения (50)
Ветеринария (50)
Военная кафедра (762)
ГДЗ (2)
География (5275)
Геодезия (30)
Геология (1222)
Геополитика (43)
Государство и право (20403)
Гражданское право и процесс (465)
Делопроизводство (19)
Деньги и кредит (108)
ЕГЭ (173)
Естествознание (96)
Журналистика (899)
ЗНО (54)
Зоология (34)
Издательское дело и полиграфия (476)
Инвестиции (106)
Иностранный язык (62791)
Информатика (3562)
Информатика, программирование (6444)
Исторические личности (2165)
История (21319)
История техники (766)
Кибернетика (64)
Коммуникации и связь (3145)
Компьютерные науки (60)
Косметология (17)
Краеведение и этнография (588)
Краткое содержание произведений (1000)
Криминалистика (106)
Криминология (48)
Криптология (3)
Кулинария (1167)
Культура и искусство (8485)
Культурология (537)
Литература : зарубежная (2044)
Литература и русский язык (11657)
Логика (532)
Логистика (21)
Маркетинг (7985)
Математика (3721)
Медицина, здоровье (10549)
Медицинские науки (88)
Международное публичное право (58)
Международное частное право (36)
Международные отношения (2257)
Менеджмент (12491)
Металлургия (91)
Москвоведение (797)
Музыка (1338)
Муниципальное право (24)
Налоги, налогообложение (214)
Наука и техника (1141)
Начертательная геометрия (3)
Оккультизм и уфология (8)
Остальные рефераты (21692)
Педагогика (7850)
Политология (3801)
Право (682)
Право, юриспруденция (2881)
Предпринимательство (475)
Прикладные науки (1)
Промышленность, производство (7100)
Психология (8692)
психология, педагогика (4121)
Радиоэлектроника (443)
Реклама (952)
Религия и мифология (2967)
Риторика (23)
Сексология (748)
Социология (4876)
Статистика (95)
Страхование (107)
Строительные науки (7)
Строительство (2004)
Схемотехника (15)
Таможенная система (663)
Теория государства и права (240)
Теория организации (39)
Теплотехника (25)
Технология (624)
Товароведение (16)
Транспорт (2652)
Трудовое право (136)
Туризм (90)
Уголовное право и процесс (406)
Управление (95)
Управленческие науки (24)
Физика (3462)
Физкультура и спорт (4482)
Философия (7216)
Финансовые науки (4592)
Финансы (5386)
Фотография (3)
Химия (2244)
Хозяйственное право (23)
Цифровые устройства (29)
Экологическое право (35)
Экология (4517)
Экономика (20644)
Экономико-математическое моделирование (666)
Экономическая география (119)
Экономическая теория (2573)
Этика (889)
Юриспруденция (288)
Языковедение (148)
Языкознание, филология (1140)

Реферат: Программа решения трансцендентного уравнения на языке Pascal

Название: Программа решения трансцендентного уравнения на языке Pascal
Раздел: Рефераты по информатике
Тип: реферат Добавлен 06:09:57 13 апреля 2010 Похожие работы
Просмотров: 24 Комментариев: 16 Оценило: 0 человек Средний балл: 0 Оценка: неизвестно     Скачать

Министерство науки и образования РТ

Казанский Государственный Технический Университет

имени А.Н. Туполева

Отчёт

по расчетно-графической работ e

Выполнил студент гр. 3108

Сабиров Ленар

Принял: Балоев. А.А.

Казань 2009 г

Задания

1. Решение трансцендентного уравнения.

Решить уравнение методом Ньютона

2. Вычисление определённого интеграла

Вычислить интеграл методом трапеции.

Задание 1. Решение трансцендентного уравнения.

Решить уравнение методом Ньютона

Решение:

1. Решение трансцендентного уравнения методом Ньютона.

1.1 Дано уравнение

(1)

1.2 Обозначим правую часть уравнения (1) через функцию:

(2)

1.3 Определим область решения уравнения. исследуем функцию для определения интервала на оси х, где функция обращается в ноль.

-1.03 1.03

1.4 Отсюда видно что x будет принимать отрицательные значения от -1.03 до 1.03

Построим график этой функции

Рис 1

Блок-схема алгоритма решения

На Рис. 2 приведена блок-схема алгоритма решения задачи.

Рис 2

Программа решения задачи на языке Pascal

program Nuton ;

{$ N +}

uses crt ;

var x , x1,eps,pf:extended;

i:integer;

function f(x:real):real;

begin

f:=x+2*(sqr(x)-1)+exp(-sin(x));

end;

function df(x:real):real;

begin

df:=1+4*x+exp(-sin(x))*(-cos(x));

end ;

begin

clrscr ;

write ('приближенное значение корня = ');

readln ( x 1);

write ('необходимая точность = ');

readln(eps);

x:=x1;

pf:=f(x)/df(x);

i:=0;

while abs(pf)>eps do

begin

x:=x-pf;

pf:=f(x)/df(x);

inc(i);

{writeln(x:1:4, pf:10:4);}

end ;

writeln ('точное значение корня = ', x :1:4);

writeln ('количество итераций = ', i );

readkay ;

Результат решения задачи

На рисунке 3 представлен результат решения задачи

Рис 3

Задание 2

Решение:

Построим график функции

Рис 4

Вычислим значение интеграла:

Блок схема алгоритма решения

На Рис 5 приведена блок схема алгоритма вычисления определённого интеграла по методу трапеций


Программа вычисления интеграла на языке Pascal

program variant8;

var n,y1,y2,a,b,h,x,k,s:real;

function f(x:real):real;

begin

f:=x+2*(sqr(x)-1)

end;

begin

write('a- нижний предел интегрирования :'); readln(a);

write('b- верхний предел интегрирования :'); readln(b);

write (' h -шаг интегрирования:'); read ( h );

x:=a;

while x<=b do begin

y1:=f(x);

x:=x+h;

y2:=f(x);

s:=s+0.5*h*(y1+y2);

end;

writeln('s=',s:10:5);

end.

Результат вычисления интеграла

1.5 На Рис5 и 6 представлен результат вычисления интеграла и погрешности его вычисления

Рис 5

Рис 6

Оценить/Добавить комментарий
Имя
Оценка
Комментарии:
Хватит париться. На сайте FAST-REFERAT.RU вам сделают любой реферат, курсовую или дипломную. Сам пользуюсь, и вам советую!
Никита16:17:30 05 ноября 2021
.
.16:17:29 05 ноября 2021
.
.16:17:27 05 ноября 2021
.
.16:17:25 05 ноября 2021
.
.16:17:24 05 ноября 2021

Смотреть все комментарии (16)
Работы, похожие на Реферат: Программа решения трансцендентного уравнения на языке Pascal

Назад
Меню
Главная
Рефераты
Благодарности
Опрос
Станете ли вы заказывать работу за деньги, если не найдете ее в Интернете?

Да, в любом случае.
Да, но только в случае крайней необходимости.
Возможно, в зависимости от цены.
Нет, напишу его сам.
Нет, забью.



Результаты(288954)
Комментарии (4177)
Copyright © 2005-2021 BestReferat.ru support@bestreferat.ru реклама на сайте

Рейтинг@Mail.ru