Проблемно-ориентированная информатика химико-технологических процессов. Кравцов А.В - 51 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

Пример 4.2.3 Программа решения уравнения методом итераций.
PROGRAM met;
LABEL m1, m2;
VAR x, x0, eps:real;
a1, a2:text;
k:integer;
FUNCTION f(x0:real):real;
BEGIN
f:=(-x0*x0*x0+2*x0*x0+0.24)/1.3;
END;
FUNCTION f1(x0:real):real;
BEGIN
f1:=-3*x0*x0+4*x0+1.3;
END;
BEGIN
assign (a1,'dat-21'); reset(a1);
read(a1,x0,eps);
k:=0;
REPEAT
x:=x0;
writeln (x0);
x0:=f(x); k:=k+1;
UNTIL abs(x-x0) < eps ;
m1: assign(a2,'res-21'); rewrite(a2);
writeln(a2,'корень уравнения',x,k);
close (a2);
END.
4.3. Приближенное решение обыкновенных дифференциальных
уравнений первого порядка
При решении научных и инженерно-технических задач часто быва-
ет необходимо математически описать какую-либо динамическую сис-
тему. Лучше всего это делать в виде дифференциальных уравнений
(ДУ) или системы дифференциальных уравнений. Наиболее часто такая
задача возникает при решении проблем, связанных с моделированием
кинетики химических реакций и различных явлений переноса (тепла,
массы, импульса) – теплообмена, перемешивания, сушки, адсорбции,
при описании движения макро- и микрочастиц.
51

Страницы