Автор работы: Пользователь скрыл имя, 07 Января 2011 в 17:52, курсовая работа
Краевые задачи, задачи, в которых из некоторого класса функций, определённых в данной области, требуется найти ту, которая удовлетворяет на границе (крае) этой области заданным условиям. Функции, описывающие конкретные явления природы (физические, химические и др.), как правило, представляют собой решения уравнений математической физики, выведенных из общих законов, которым подчиняются эти явления. Когда рассматриваемые уравнения допускают целые семейства решений, дополнительно задают так называемые краевые или начальные условия, позволяющие однозначно выделить интересующее нас решение. В то время, как краевые условия задаются исключительно на граничных точках области, где ищется решение, начальные условия могут оказаться заданными на определённом множестве точек внутри области.
end;
Z:=B[3,3];
for j:=1 to 5 do
begin
B[3,j]:=B[3,j]/Z;
end;
for j:=1 to 5 do
begin
C[3,j]:=B[3,j];
end;
for j:=1 to 5 do
begin
B[1,j]:=C[1,j];
end;
Z:=B[4,1];
for j:=1 to 5 do
begin
B[1,j]:=B[1,j]*Z;
end;
for j:=1 to 5 do
begin
B[4,j]:=B[4,j]-B[1,j];
end;
for j:=1 to 5 do
begin
B[2,j]:=C[2,j];
end;
Z:=B[4,2];
for j:=1 to 5 do
begin
B[2,j]:=B[2,j]*Z;
end;
for j:=1 to 5 do
begin
B[4,j]:=B[4,j]-B[2,j];
end;
for j:=1 to 5 do
begin
B[3,j]:=C[3,j];
end;
Z:=B[4,3];
for j:=1 to 5 do
begin
B[3,j]:=B[3,j]*Z;
end;
for j:=1 to 5 do
begin
B[4,j]:=B[4,j]-B[3,j];
end;
for j:=1 to 5 do
begin
C[4,j]:=B[4,j];
end;
for j:=1 to 5 do
begin
B[2,j]:=C[2,j];
end;
x4:=C[4,5]/C[4,4];
x3:=C[3,5]-x4*C[3,4];
x2:=C[2,5]-x4*C[2,4]-x3*C[2,3]
x1:=C[1,5]-x4*C[1,4]-x3*C[1,3]
writeln('y(1)=',x1:3:3);
writeln('y(1,1)=',x2:3:3);
writeln('y(1,2)=',x3:3:3);
writeln('y(1,3)=',x4:3:3);
readkey;
end.
program tochki;
uses crt, graph;
var
gd,gm,a:integer;
begin
clrscr;
initgraph(gd,gm,'');
setcolor(12);
line(320,0,320,480);
line(0,240,640,240);
outtextxy(400,100,'tochka1');
outtextxy(440,110,'tochka2');
outtextxy(480,120,'tochka3');
outtextxy(530,130,'tochka4');
readkey;
end.
Информация о работе Решение краевой задачи для ОДУ методом конечных разностей