|
Исходные коды на Delphi 7 Задача из курса "Численные методы". Интерполяция кубическим сплайном. Видел в сети подобные программы, но они стоили денег :(. А ведь мешать другим людям получать знания подло! Эта программа досается вам в наследство совершенно бесплатно ;) Задание: 1. Построить таблицу значений yi на отрезке [a,b] с шагом h=(b-a)/n. Значения a и b и функцию y=f(x) взять из задания; n – любое целое. 2. По полученной таблице yi, вычислить коэффициенты сплайнов. 3. Вычислить значения сплайна и истинные значения функции в точке xi = a + (i – 0,5)h, i = 1, 2, …, n. 4. Вычислить значение сплайна и функции в произвольной точке s, задаваемой с экрана. Входные данные: x0 – начальное значение x. xn – конечное значение x. n – количество разбиений отрезка [a,b]. s – произвольное значение x [a,b]. Выходные данные: Массив S(x*) – программно вычисленное приближенное значение функции в точке x*. Массив Y(x*) – истинное значение функции в точке x*. Массив Расх. – |S(x*i) - y(x*i)|. p – программно вычисленное приближенное значение функции в точке s. y – истинное значение функции в точке s.
| |