(4.11)
(4.11) . :
. (4.12)
(4.11)
(4.13)
, .
.
,
.
.
.
.
.
,
(4.14)
, (4.12) , (4.9) :
(4.15)
(4.14) (3.4):
(4.16)
(4.7), (4.12) (4.13), .
(4.17)
, (3.5)
, :
(4.18)
, , , . , (4.3)
(4.19)
(4.16), (4.18), (3.7) , (3.8) (3.9). , , 1 3 :
(4.20)
(4.21)
5.
, . ‑ . , , . , . , , .
Type
float=extended;
TGlobMat=array[1..N;1..N] of float;
TGlobVec= array[1..N] of float;
sGlobMat=^TGlobMat;
sGlobVec=^TGlobVec;
Var
B:sGlobMat;
U,F: sGlobVec;
, , .
Type
TTable1=record
x,y:float;
b:integer;
end;
TTable2=record
n1,n2,n3:integer;
end;
arTab2=array[1..M] of TTable2;
arTab1= array[1..N] of TTable1;
sTab1=^arTab1;
sTab2=^arTab2;
Var
Tab1:sTab1;
Tab2:sTab2;