Курсовой проект

20101. Програма розв’язання звичайних диференціальних рівнянь однокроковими методами
Компьютеры, программирование

Результатом розвязання задачі Коші являється функція. В даному випадку отримати цю функцію в аналітичному вигляді обчислювальні однокрокові методи не дозволяють. Вони представляють функцію в табличному вигляді, тобто набір точок значень х і відповідних їм значень функції у(х). Тому для більшої наглядності було вирішено по цим точкам намалювати графіки функцій у(х) для кожного з методів окремо (дивись рисунок 4). На тому ж малюнку виведені значення похибок для кожного методу окремо. На рисунку 5 виведено значення функції у(х) в дискретному вигляді з кроком h1=0.1.
20102. Програми аудиту та зламу паролів John The Ripper та L0phtcrack
Компьютеры, программирование

Для інсталяції просто розархівуйте дистрибутивний архів у будь-який каталог на жорсткому диску.Створіть ярлик до програми L0phtcrack.exe (або L0phtcrack95.exe для Windows 95/98).Крім того, якщо ви фізично підключені до даної локальної мережі і використовуєте Windows NT 4.0 (або Window 2000), ви можете використовувати мережевий sniffer readsmb.exe, за допомогою якого можна отримати паролі клієнтських машин Windows 3.11/95/95 і MS-DOS Перед використанням мережевого sniffer'a необхідно попередньо встановити мережевий NDIS-драйвер, який входить до дистрибутивний комплект.Цей драйвер може працювати тільки поверх драйвера реально присутньої в системі мережевого Ethernet-плати і використовує протокол CSMA-CD.Для установки NDIS-драйверу відкрийте аплет "Network" (Мережа) у панелі керування.На вкладці "Protocols" (Протоколи) натисніть кнопку "Add" (Додати).Потім натисніть кнопку "Have Disk" (Установити з диска) і визначте каталог, в який ви встановили L0phtCrack і в якому знаходиться файл Oemsetup.inf файл.Після перезавантаження ви зможете використовувати мережевий sniffer readsmb.exe, для перехоплення паролів клієнтських машин Windows.
20103. Програми економічного і соціального розвитку Харківської області
Экономика
Пріоритетні цілі та завдання на 2009 рік
- підтримка на регіональному рівні інноваційно-інвестиційних конкурентоспроможних проектів, спрямованих на розвиток експортного потенціалу Харківської області;
- проведення системного моніторингу експортно-імпортних операцій підприємств регіону та оперативне реагування на можливі зміни зовнішньоторговельного балансу області;
- розвиток міжрегіональної співпраці в рамках Угод про співробітництво між Харківською областю та регіонами-побратимами інших країн, удосконалення міжрегіонального співробітництва на базі двосторонніх угод про партнерські звязки;
- вирішення проблемних питань співробітництва з країнами СНД, розвиток договірно-правової бази та реалізація програм економічного співробітництва; запровадження комплексу заходів щодо підвищення конкурентоспроможності продукції підприємств регіону з метою виходу на ринки країн ЄЕП;
- налагодження взаємодії з торговельно-економічними місіями при посольствах закордонних держав, акредитованих в Україні, та України за кордоном;
- проведення презентаційно-іміджевих міжнародних виставкових заходів, презентацій регіону у міжнародних виставкових заходах, а саме: у Російській Федерації (Московська, Ленінградська, Курська та Ростовська області), Білорусі, Німеччині, Туреччині, Словенії, а також у Міжнародному інноваційно-інвестиційному форумі "Регіональна співдружність" та виставці в рамках Великого Слобожанського ярмарку-2009;
- поглиблення співпраці з прикордонними регіонами Російської Федерації в рамках Єврорегіону «Слобожанщина».
20104. Программа - калькулятор
Компьютеры, программирование

Проанализировав поставленную задачу, я пришел к выводу, что необходимо разработать синтаксический анализатор выражений, для реализации которого я использовал алгоритм множественного выбора. При разборе выражение разбивается на составные части термы, который в свою очередь состоит из факторов. Факторами могут являться числа или подвыражения, состоящего из других факторов. Терм является произведением или отношением факторов. Поочередно, анализируя каждый введенный символ, программа объединяет их в факторы, а готовые факторы в термы, после подсчета которых выдается окончательный ответ. Это правило очень важно, так как должен соблюдаться строгий приоритет выполнения операций, то есть вложенные элементы должны иметь операторы с более высоким приоритетом. Сначала, если есть функции, вычисляется их значение. У арифметических операций приоритет следующий: сначала выполняется возведение в степень, затем умножение, деление, сложение и вычитание. Если выражение содержит скобки, то в первую очередь вычисляется подвыражение во вложенных скобках самого нижнего уровня, а затем по возрастанию уровня.
20105. Программа – резидент переключателя альтернативной кодировки (русификатор)
Компьютеры, программирование

С самого начала существования IBM совместимых компьютеров встала проблема вывода на экран и ввода с клавиатуры символов кириллицы. Только начиная с версии MS DOS 6.0 появилась поддержка национальной 866 страницы. До появления версии MS DOS 6.0 проблему решали так называемые программы русификаторы. Эти программы замещали символы дополнительного кодового набора. Делалось это путем подстановки шрифта прошитого в ПЗУ видеоадаптера своим. Эти программы были практически на каждом компьютере. Самыми известными из них являлись ENHFONT, KEYRUSS, LMSCR&LMKEY, KYRILLIC. Был еще один способ решить проблему русификации - перепрограммировать ПЗУ видеоадаптера, но он не нашел большого применения.
20106. Программа "Общежитие"
Компьютеры, программирование

";.Add(new%20DGStudent(students[rooms[roomindex].Students[i]].Surname%20+%20"%20"%20+%20students[rooms[roomindex].Students[i]].Name%20+%20"%20"%20+%20students[rooms[roomindex].Students[i]].Patrname,%20info,%20i));.Content%20=%20",%20%d0%b8%d0%b7%d0%bd%d0%b8%d1%85%d1%81%d0%b2%d0%be%d0%b1%d0%be%d0%b4%d0%bd%d0%be:%20"%20+%20(rooms[roomindex].Max%20-%20dataGrid.Items.Count).ToString();">{info = "";(students[rooms[roomindex].Students[i]].Course != -1) info += " Курс " + students[rooms[roomindex].Students[i]].Course.ToString() + ".";(students[rooms[roomindex].Students[i]].Group != "") info += " Группа " + students[rooms[roomindex].Students[i]].Group + ".";(students[rooms[roomindex].Students[i]].Age != -1) info += " Возраст " + students[rooms[roomindex].Students[i]].Age.ToString() + ".";(students[rooms[roomindex].Students[i]].Phone != "") info += " Телефон " + students[rooms[roomindex].Students[i]].Phone + ".";(info == "") info = "<НЕТ>";.Add(new DGStudent(students[rooms[roomindex].Students[i]].Surname + " " + students[rooms[roomindex].Students[i]].Name + " " + students[rooms[roomindex].Students[i]].Patrname, info, i));.Content = ", изнихсвободно: " + (rooms[roomindex].Max - dataGrid.Items.Count).ToString();
20107. Программа "Строковый калькулятор"
Компьютеры, программирование

Данная курсовая работа демонстрирует автоматизированное решение арифметической задачи, путём написания ее на языке программирования С++. Язык C++ явился мощным и стремительным рывком в развитии программирования. C++ и по сей день занимает господствующее положение среди языков программирования в мире. Огромное множество профессиональных программистов использует именно его при разработке разного рода проектов. Очевидно, этот язык будет сохранять свое солидное положение ещё не один год, при этом по-прежнему развиваясь и совершенствуясь.
20108. Программа "Учет успеваемости и посещаемости учащихся ГГАЭК"
Компьютеры, программирование

Данная программа предназначена для использования в ГГАЭК, для учета успеваемости и посещаемости учащихся, а также для контроля над пропусками занятий без уважительной причины. «Учет успеваемости и посещаемости учащихся ГГАЭК» по-другому можно назвать «Электронный журнал», потому что каждый из преподавателей может им пользоваться. При этом будет намного упрощен подсчет среднего балла, как за месяц, так и за семестр и за год.
20109. Программа "1С: Предприятие"
Компьютеры, программирование

Для ввода начальных данных об организации предназначен Стартовый помощник. Стартовый помощник разбит на разделы. Первый раздел Приветствие, переходим во второй раздел кнопкой Далее. Второй Сведения об организации, в котором вводим название организации «ООО Амирджанова», кнопка Далее, следующий раздел Общие сведения об организации, вводим полное и краткое наименование организации, выбираем тип организации, вводим ИНН/КПП, кнопка Далее. Вводим Банк и все остальные необходимые реквизиты. Раздел Учетная политика: указываем, что учет в программе ведется с 2009 года, кнопка Далее. В разделе «Подразделения организации» вводим подразделения: администрация, бухгалтерия, склад №1, склад №2, склад №3, обслуживающее подразделение. В разделе «Контактная информация» вводим адреса, телефоны, E-mail организации, кнопка Далее. Раздел Ответсвенные лица организации заполняется следующим образом: в графе Руководитель пишем ФИО Сумм Петр Николаевичи должность Директор, в графе Главный бухгалтер пишем ФИО Амирджанова Наталия Георгиевна и должность - Главный бухгалтер, в графе Кассир пишем ФИО Шнипельсон Илья Авраамович и должность Кассир, кнопка Далее. В разделе Складской учет выбираем Вести количественно суммовой учет по складам. В разделе Учет возвратной тары выбираем Нет, кнопка Далее. Раздел Основные настройки пользователя выбираем Запрашивать подтверждения при закрытии программы и Показывать в документах счета учета. В разделе Значения для подстановки выбираем нашу организацию, основной склад №1, основную цену продажи, единицу измерения штуки, кнопка Далее. Ввод основных сведений завершен нажимаем кнопку Готово.
20110. Программа "Доход по вкладу" (Delphi)
Компьютеры, программирование
Проект состоит из следующих компонентов:
1. форма окно формы представляет собой проект Windows окно будущей программы. Это окно содержит стандартный для Windows интерфейсный элемент полосу заголовка;
2. программный модуль модулем можно считать самостоятельный раздел программы, в чем-то подобный главе в книге. Модуль создается каждый раз, при создании новой формы. При компиляции программы Delphi создает файлы с расширениями PAS, DFM, и DCU для каждого модуля. Основная программа весьма специфична: она содержит перечень всех используемых в программе модулей и несколько исполняемых операторов, обеспечивающих создание нужных окон и связь программы с Windows. Вся основная работа программы управляется кодом, содержащимся в модулях.
20111. Программа "Калькулятор"
Компьютеры, программирование
Инструкция по эксплуатации программы:
1. Выполнение простых вычислений:
2. В меню Вид выберите Обычный или нажмите клавишу F2;
3. Введите первое число;
4. Нажмите кнопку + (сложение), - (вычитание), * (умножение) или / (деление);
5. Введите следующее число;
6. Введите необходимый оператор;
7. Введите остальные числа и операторы;
8. Нажмите кнопку =.
9. Выполнение инженерных вычислений:
10. В меню Вид выберите Инженерный или нажмите клавишу F3;
11. Выберите систему счисления;
12. Введите первое число;
13. Выберите нужный оператор;
14. Введите следующее число;
15. Введите остальные операторы и числа;
16. Нажмите кнопку =.
20112. Программа "Морской бой"
Компьютеры, программирование

Правила игры следующие: в поле 10х10 пользователь расставляет свои корабли (корабли не должны лежать друг на друге, стоять рядом, пересекаться). Точно так же компьютер на своем игровом поле расставляет свои корабли. Количество кораблей 10, а именно: один четырехпалубный (одна палуба соответствует одной клетке игрового поля), два трехпалубных, три двухпалубный и четыре однопалубных. После расстановки кораблей пользователь и компьютер поочередно «стреляют» по клеткам игрового поля противника. Если кому-либо из них удалось попасть во вражеский корабль, то, согласно правилам, ход не переходит к противнику (если игрок попал в корабль противника, то он имеет право еще одного выстрела) до следующего промаха. Победа достается тому, кто первым уничтожит все корабли противника. Ниже приводится диаграмма прецедентов, на которой изображены варианты действий для пользователя и компьютера.
20113. Программа "Система обучения"
Компьютеры, программирование

Если преподаватель уже зарегистрирован в системе, то он вводит свой логин и пароль, и если он верный то попадает в окно, где ему предоставляется меню преподавателя. Если преподаватель не зарегистрирован в системе, то он нажимает на кнопку "Регистрация" и попадает в окно регистрации пользователя. Там студент ставит переключатель в позицию "Преподаватель", заполняет поля регистрации, если поля заполнены верно(т.е заполнены все поля, пароль указан одинаково два раза, верно указан ключ, который известен только преподавателям и не использованы служебные символы(~,#,%,&)), то по нажатию на кнопку "Регистрация" преподаватель регистрируется и входит в систему. Далее преподаватель попадает в "Меню преподавателя". В этом окне преподаватель может выбрать то, что он желает сделать: править лекции, править вопросы и ответы, просмотреть результаты обучения. По нажатию на кнопку "Править лекции" преподаватель попадает в окно в котором он может добавить или изменить материал в лекциях. Для этого необходимо выбрать урок, который необходимо исправить, ввести информацию и нажать на кнопку "Сохранить". По нажатию на кнопку "Править вопросы", преподаватель попадает в окно, в котором можно править вопросы и ответы. Для этого в необходимом вопросе или ответе нужно изменить текст и нажать на кнопку "Сохранить". По нажатию на кнопку "Смотреть рез-ты обучения" преподаватель попадает в окно, в котором он может просмотреть результаты обучения студентов .Для этого необходимо выбрать из списка интересующего студента, и нажать на кнопку "Показать", после чего в текстовые поля запишется информация про этого студента
20114. Программа 1С: "1С: Бухгалтерия 8.0" в ООО "Уршак" Миякинского района
Менеджмент

продолжение ПРИЛОЖЕНИЯ Дпокупателиизаказчики231--Дебиторская задолженность (платежи по которой ожидаются в течение 12 месяцев после отчетной даты)240-23втомчисле:покупателиизаказчики241-5Краткосрочныефинансовыевложения250--Денежныесредства260-21Прочиеоборотныеактивы270--ИтогопоразделуII290-119БАЛАНС(суммастрок190+290)300-450Форма0710001с.2ПАССИВКод
показателяНа начало отчетного годаНа конец отчетного периода1234III.КапиталирезервыУставныйкапитал410-356Собственныеакции,выкупленныеуакционеров411--Добавочныйкапитал420--Резервныйкапитал430--втомчисле:резервные фонды, образованные в соответствии с законодательством431--резервы, образованные в соответствии с учредительными документами432--Нераспределеннаяприбыль(непокрытыйубыток)470-43ИтогопоразделуIII490-399IV.ДолгосрочныеобязательстваЗаймыикредиты510-8Отложенныеналоговыеобзательства515--Прочиедолгосрочныеобязательства520--ИтогопоразделуIV590-8V.КраткосрочныеобязательстваЗаймыикредиты610-22Кредиторскаязадолженность620-21втомчисле:поставщикииподрядчики621-2задолженностьпередперсоналоморганизации622-19задолженность перед государственными внебюджетными фондами623-1задолженностьпоналогамисборам624--прочиекредиторы625--Задолженностьучастникам(учредителям)повыплатедоходов630--Доходыбудущихпериодов640--Резервыпредстоящихрасходов650--Прочиекраткосрочныеобязательства660--ИтогопоразделуV690-43БАЛАНС(суммастрок490+590+690)700-450СПРАВКА о наличии ценностей, учитываемых на забалансовых счетахАрендованные основные средства910--в том числе по лизингу911--Товарно-материальные ценности, принятые на ответственное хранение920--Товары, принятые на комиссию930--Списанная в убыток задолженность неплатежеспособных дебиторов940--Обеспечения обязательств и платежей полученные950--Обеспечения обязательств и платежей выданные960--Износ жилищного фонда970--продолжение ПРИЛОЖЕНИЯ ДИзнос объектов внешнего благоустройства и других аналогичных объектов980--Нематериальные активы, полученные в пользование990----
20115. Программа WinVN
Компьютеры, программирование
1. Откройте окно телеконференции, содержащей статьи с закодированными файлами.
2. Отметьте статью (статьи), содержащую закодированный файл.
3. Откройте меню Articles и выберите команду Decode Selected Articles, или нажмите кнопку Decode Articles на панели инструментов.
4. Заполните следующие поля:
5. Please enter the path in which to save the decoded files. Введите путь к каталогу, в котором будут сохраняться извлеченные файлы. Помните, что при использовании многих способов кодирования имя файла содержится вместе с данными. Следовательно, WinVN должен знать только путь.
6. Execute decoded files. Укажите, хотите ли вы запустить на выполнение файл сразу после декодирования. Эту опцию включать не рекомендуется. Программы, полученные из телеконференций, следует проверить перед запуском на предмет наличия вирусов.
7. Keep Current Article Header Visible. Когда эта опция включена, для каждого декодируемого файла создается отдельное окно состояния. В противном случае все сообщения помещаются в одно окно состояния.
8. Include any open articles in decode. Если включена эта опция, то будут декодироваться все выбранные (отмеченные вами) файлы, а также все файлы, содержащиеся в открытых статьях. Когда открытые окна со статьями отсутствуют, эта опция оказывается недоступной.
9. Auto-nunimiled decoding status windows. Когда эта опция выбрана, окна состояния будут минимизированы.
10. Verbose Status Windows. Когда выбрана эта опция, в окне состояния отображается дополнительная техническая информация.
11. Dumb Decode. Включите эту опцию только в том случае, когда декодируемые статьи расположены в правильном порядке. При этом WinVN не будет пытаться упорядочивать файлы, разнесенные по нескольким статьям.
12. Нажмите кнопку ОК. Начнется процесс декодирования, информация о котором будет отображаться в окнах состояния. По окончании процесса декодированные файлы будут сохранены в выбранном вами каталоге.
20116. Программа вычисления минимума заданной функции
Компьютеры, программирование

3. Программа модульная, содержит следующие модули: - основной модуль, принимающий исходные данные, передающий их на обработку и выводящий конечный и промежуточный результаты - модуль поиска значений интерполяционного многочлена в точках x1 и x2 - модуль, задающий F(x) с параметрами LX1, LX2, найденными модулем интерполирования - модуль поиска минимума функции F(x) на отрезке [a;b] методом дихотомии
20117. Программа вычисления определенного интеграла методом прямоугольников с визуализацией решения
Компьютеры, программирование

Image%20=%20System::Drawing::Bitmap(pictureBox1->Size.Width,->Size.Height);::Drawing::Graphics^%20g%20=%20::Drawing::Graphics::FromImage(pictureBox1->Image);::Drawing::Pen^%20pen%20=%20System::Drawing::Pen(colorDialog1->Color);::Drawing::Brush^%20brush%20=%20System::Drawing::SolidBrush(colorDialog1->Color);x1,x2;=1;=1;n;//%d1%87%d0%b8%d1%81%d0%bb%d0%be%20%d0%bf%d1%80%d1%8f%d0%bc%d0%be%d1%83%d0%b3%d0%be%d0%bb%d1%8c%d0%bd%d0%b8%d0%ba%d0%be%d0%b2shag,//%d1%88%d0%b0%d0%b3%20%d0%b2%20%d1%86%d0%b8%d0%ba%d0%bb%d0%b0%d1%85,%20%d1%82.%d0%b5.%20%d0%bf%d1%80%d0%b8%d1%80%d0%b0%d1%89%d0%b5%d0%bd%d0%b8%d0%b5%20%d0%bf%d0%be%20%d0%be%d1%81%d0%b8%20X;//%d1%80%d0%b0%d0%b7%d0%bd%d0%be%d1%81%d1%82%d1%8c%20%d0%bc%d0%b5%d0%b6%d0%b4%d1%83%20%d0%b2%d0%b5%d1%80%d1%85%d0%bd%d0%b8%d0%bc%20%d0%b8%20%d0%bd%d0%b8%d0%b6%d0%bd%d0%b8%d0%bc%20%d0%bf%d1%80%d0%b5%d0%b4%d0%b5%d0%bb%d0%b0%d0%bc%d0%b8%20%d0%b8%d0%bd%d1%82%d0%b5%d0%b3%d1%80%d0%b8%d1%80%d0%be%d0%b2%d0%b0%d0%bd%d0%b8%d1%8f,%20%d0%bd%d0%b5%d0%be%d0%b1%d1%85%d0%be%d0%b4%d0%b8%d0%bc%d0%b0%20%d0%b4%d0%bb%d1%8f%20%d0%bd%d0%b0%d1%85%d0%be%d0%b6%d0%b4%d0%b5%d0%bd%d0%b8%d1%8f%20%d1%88%d0%b0%d0%b3%d0%b0(radioButton1->Checked==true)%20n=Convert::ToInt64(numericUpDown1->Value);maxY,minY;(radioButton2->Checked==true)%20n=6;(check(x1,x2)&&(x2>x1))">}y;: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e) {->Image = System::Drawing::Bitmap(pictureBox1->Size.Width,->Size.Height);::Drawing::Graphics^ g = ::Drawing::Graphics::FromImage(pictureBox1->Image);::Drawing::Pen^ pen = System::Drawing::Pen(colorDialog1->Color);::Drawing::Brush^ brush = System::Drawing::SolidBrush(colorDialog1->Color);x1,x2;=1;=1;n;//число прямоугольниковshag,//шаг в циклах, т.е. приращение по оси X;//разность между верхним и нижним пределами интегрирования, необходима для нахождения шага(radioButton1->Checked==true) n=Convert::ToInt64(numericUpDown1->Value);maxY,minY;(radioButton2->Checked==true) n=6;(check(x1,x2)&&(x2>x1))
20118. Программа деятельности эксперта при проведении аттестации образовательного учреждения
Педагогика

Индивидуальная форма сбора информации означает, что каждый эксперт работает самостоятельно, формирует свою частную позицию и фиксирует ее на бланке ответов или в форме текста экспертного заключения. Это наиболее часто используемая форма опроса, поскольку она позволяет обеспечить независимость мнений экспертов от влияния авторитетов в данной области, сократить время сбора информации. При такой форме опроса экспертам не обязательно находиться одновременно в одном помещении, достаточно лишь обеспечить получение ими одинаковой информации. Необходимо обеспечить усвоение всеми экспертами задачи оценивания, критериев оценки, алгоритма процедуры опроса, а также благоприятный психологический и эмоциональный фон для работы. В этих целях участникам сообщаются сущность изучаемой проблемы и мотивы обращения именно к данным лицам в качестве специалистов; сведения, убеждающие в компетентности экспертов; информацию о содержании вопросов; формулировки вопросов; объясняется процедура оценки. Если у экспертов возникают какие-либо вопросы по процедуре оценивания, то необходимо ответить на них до начала работы. Важным моментом при индивидуальной форме работы экспертов становится заранее оговоренный срок ее окончания и возврата оценочных листов организатору. В противном случае экспертиза может затянуться на неопределенный срок.
20119. Программа для вычисления интегралов
Компьютеры, программирование

Данное программное обеспечение было разработано на компьютере на базе процессора Intel в операционной системе Windows 7. Предполагается, что приложение сможет запуститься на любом компьютере с более-менее современной комплектацией. Тестирование приложение проходило также в ОС Windows XP, сбоев в работе обнаружено не было.
20120. Программа для вычисления корней нелинейных уравнений итерационным методом
Компьютеры, программирование

%203%20dofToAnimate%20then.ProcessMessages;(500);;.Clear;.AddXY(x,%20Func(x));:=%20x%20+%200.5;;:=%20x%20-%200.5;;TEquation.DrawBisector;x:%20extended;.Clear;(1.5,%204.5,%201.5,%204.5);:=%202;x%20<=%204%20dofToAnimate%20then.ProcessMessages;(8);;.AddXY(x,%20x);:=%20x%20+%200.01;;;TEquation.DrawFuncPhi;x:%20extended;:=%202;x%20<=%204%20dofToAnimate%20then.ProcessMessages;(1);;.AddXY(x,%20Phi(x));:=%20x%20+%200.01;;;TEquation.FindCrossing(approxTrunc:%20extended):%20extended;newResult,%20oldResult:%20extended;:=%20approxTrunc;(approxTrunc);:=%20DrawHorizontal(%20approxTrunc%20);abs((newResult%20-%20oldResult)/oldResult)%20>=%20fAccuracy%20do:=%20newResult;(oldResult);:=%20DrawHorizontal(oldResult%20);;:=%20newResult;;TEquation.DrawVertical(x0:%20extended):%20extended;Line:%20TLineSeries;:%20extended;:%20extended;:%20extended;:=%20TLineSeries.Create(fLineSeriesFx.ParentChart);.Color%20:=%20clBlack;.Pen.Width%20:=%201;.ParentChart.AddSeries(%20Line%20);:=%202;:=%20Phi(x0);:=%20(bound%20-%20y%20)/50;y%20<%20bound%20+%20step/2%20dofToAnimate%20then.ProcessMessages;;.AddXY(x0,%20y);:=%20y%20+%20step;;:=%20y%20-%20step;;TEquation.DrawHorizontal(x0:%20extended):%20extended;Line:%20TLineSeries;:%20extended;:%20extended;:%20boolean;:%20extended;:=%20TLineSeries.Create(fLineSeriesFx.ParentChart);.Color%20:=%20clBlack;.Pen.Width%20:=%201;.ParentChart.AddSeries(%20Line%20);:=%20Phi(x0)%20>%20x0;:=%20x0;:=%20Phi(x0);:=%20abs((%20bound%20-%20x)/50);(x%20>%20bound%20-%20step/2%20+%202*step*(integer(toRight)))%20xor%20toRight%20dofToAnimate%20then.ProcessMessages;;.AddXY(x,%20bound);:=%20x%20-%20step%20+%202*step*(integer(toRight));;:=%20x%20+%20step%20-%202*step*(integer(toRight));;TEquation.DrawTrunc;;TEquation.ChangeAxes(leftMin,%20leftMax,%20bottomMin,%20bottomMax:%20extended);.ParentChart.Axes.Left.Minimum%20:=%20leftMin;.ParentChart.Axes.Left.Maximum%20:=%20leftMax;.ParentChart.Axes.Bottom.Minimum%20:=%20bottomMin;.ParentChart.Axes.Bottom.Maximum%20:=%20bottomMax;;TEquation.Func(x:%20extended):%20extended;:=%20exp(x)%20+%20ln(x)%20-%2010*x;;TEquation.Phi(x:%20extended):%20extended;:=%20x%20-%200.07*Func(x);;.">fResult := FindCrossing(approxTrunc);.Caption := 'Корень найден: x = ' + FloatToStrF( fResult,ffFixed, 4, 3);;;TEquation.DrawMainFunc;x: extended;.Clear;(-20, 25, -0.5, 4.5);:= 0.0001;x <= 4 dofToAnimate then.ProcessMessages;(1);;.AddXY(x, Func(x));:= x + 0.01;;;TEquation.FindApproxTrunc: extended;x: extended;:= 1;.Clear;.Color := clGreen;abs(Func(x)) > 3 dofToAnimate then.ProcessMessages;(500);;.Clear;.AddXY(x, Func(x));:= x + 0.5;;:= x - 0.5;;TEquation.DrawBisector;x: extended;.Clear;(1.5, 4.5, 1.5, 4.5);:= 2;x <= 4 dofToAnimate then.ProcessMessages;(8);;.AddXY(x, x);:= x + 0.01;;;TEquation.DrawFuncPhi;x: extended;:= 2;x <= 4 dofToAnimate then.ProcessMessages;(1);;.AddXY(x, Phi(x));:= x + 0.01;;;TEquation.FindCrossing(approxTrunc: extended): extended;newResult, oldResult: extended;:= approxTrunc;(approxTrunc);:= DrawHorizontal( approxTrunc );abs((newResult - oldResult)/oldResult) >= fAccuracy do:= newResult;(oldResult);:= DrawHorizontal(oldResult );;:= newResult;;TEquation.DrawVertical(x0: extended): extended;Line: TLineSeries;: extended;: extended;: extended;:= TLineSeries.Create(fLineSeriesFx.ParentChart);.Color := clBlack;.Pen.Width := 1;.ParentChart.AddSeries( Line );:= 2;:= Phi(x0);:= (bound - y )/50;y < bound + step/2 dofToAnimate then.ProcessMessages;;.AddXY(x0, y);:= y + step;;:= y - step;;TEquation.DrawHorizontal(x0: extended): extended;Line: TLineSeries;: extended;: extended;: boolean;: extended;:= TLineSeries.Create(fLineSeriesFx.ParentChart);.Color := clBlack;.Pen.Width := 1;.ParentChart.AddSeries( Line );:= Phi(x0) > x0;:= x0;:= Phi(x0);:= abs(( bound - x)/50);(x > bound - step/2 + 2*step*(integer(toRight))) xor toRight dofToAnimate then.ProcessMessages;;.AddXY(x, bound);:= x - step + 2*step*(integer(toRight));;:= x + step - 2*step*(integer(toRight));;TEquation.DrawTrunc;;TEquation.ChangeAxes(leftMin, leftMax, bottomMin, bottomMax: extended);.ParentChart.Axes.Left.Minimum := leftMin;.ParentChart.Axes.Left.Maximum := leftMax;.ParentChart.Axes.Bottom.Minimum := bottomMin;.ParentChart.Axes.Bottom.Maximum := bottomMax;;TEquation.Func(x: extended): extended;:= exp(x) + ln(x) - 10*x;;TEquation.Phi(x: extended): extended;:= x - 0.07*Func(x);;.

Blog

Курсовой проект