Читать диплом по всему другому: "Вычисление значения функции при помощи полинома Лагранжа" Страница 1

(Назад) (Cкачать работу)

Оглавление Задание курсовой работы

Вычислительные методы

Описание диалогового взаимодействия пользователя с программой

Текст программы на языке Pascal с комментариями

Модуль для ввода и вывода данных

Модуль для основных действий

Главная программа

Общие принципы работы программы

Контрольный пример

Компьютерные вирусы. Классификация вирусов. Антивирусные средства

Выводы

Найти значения функции y(x) в точках х=1.52, 1.55, 1.58, 1.61, 1.67, если дана таблица ее значений в точках:

Изобразить график функции с отмеченными на нем точками

При этом программа должна иметь модульную структуру, быть оформлена в виде пользовательских (библиотечных) модулей, иметь графическую заставку, обеспечивать взаимодействие с пользователем через систему меню, предоставить возможность выбора пользователем подкоренного выражения и степеней функции, обеспечивать возможность ввода исходных данных, как с клавиатуры, так и из текстового файла, осуществлять вывод результатов на экран дисплея или в файл в виде таблиц с использованием кодов псевдографики, предусмотреть графическое отображение решения задачи.

В данной курсовой работе для вычисления значения функции в заданных точках используется интерполяционный полином Лагранжа, который имеет вид:

Составить программу вычисления интерполяционного полинома Лагранжа, который имеет вид:,

где xi и yi - значения функции, заданной таблично:

Для удобного пользования данной программой в ней предусмотрена система меню, состоящая из 8 пунктов. При вводе номера одного из пунктов, вызывается подпрограмма, находящаяся в одном из модулей и соответствующая выбранному действию.

Модуль «inout» содержит в себе все подпрограммы для организации ввода и вывода данных на экран и записи их в файлы. Данный модуль использует стандартные модули «сrt» и «graph». unit inout;

interfacegraph,crt;mas=array[1.. 2] of real; -массив для хранения пары чисел х и у(х)

fm=file of mas; - файл для хранения чисел

procedure vvodklav(var f,n:fm);prosmotr(var f,n:fm);izmenenie(var f,n:fm);readfile(var f,n:fm);out(var f,n:fm; var t:text);zastavka;

Процедура vvodklav обеспечивает ввод данных с клавиатуры. У пользователя есть возможно выбрать вводить ли данные для расчета или те значения х, для которых будет считаться значение у(х).Процедура имеет два параметра - два файла, в которых будут храниться данные. procedure vvodklav;c,i:integer; a:mas; b:real; z:char;(20,5,60,20);(7);(0);;(‘Ввести исходные данные?? y/n');

readln(z);z='y' then begin('Ввод исходных данных');

writeln('Сколько значений?');

readln(c);(f);i:=1 to c do begin('Введите x',i);(a[1]);('Введите y',i);(a[2]);(f,a);;(f);;(20,5,60,20);(7);(0);;('Ввести данные для расчета? y/n');

readln(z);z='y' then begin('Ввод данных для расчета');

writeln('Сколько значений?');

readln(c);

rewrite(n);i:=1 to c do begin('Введите x');(a[1]);[2]:=0;(n,a);;(n);;(1,1,80,25);(black);;

Похожие работы