Курсовая работа: Використання елементарних перетворень для знаходження оберненої матриці

CMSqrError=18; {A}

CDetError=19; {A}

CSortError=20; {A}

CDGaussError=21; {A}

CCuanZeeroError=22; {A}

CSwapError=23; {A}

CMulToNumError=24; {A}

CStopped=25;

CDegrError=26; {A}

CIgError=27; {A}

CZFE=28;

Type

TOE=Extended;

Ar=Array [1. . (Word(Pred(0)) +1) div SizeOf(TOE)] of TOE;

Ar31=Array [1. .3 1,1. .3 1] of TOE;

Ar63=Array [1. .6 3,1. .6 3] of TOE;

Tabl=Object

CBars,CLines: Byte;

M: Pointer; {**}

SizeInMemory: Word; {**}

Errors: Set of Byte;

Exist: Boolean;

Constructor VMT;

Procedure DataInit(L,B: Byte); Virtual;

Procedure SetE(I,J: Byte; E: TOE);

Function GetE(I,J: Byte): TOE;

Procedure Del;

Procedure ReadOfText(Name: String; Search: String);

Procedure WriteToText(Name: String; F1,F2: Byte);