Курсовая работа: Решение системы линейных уравнений методом Гаусса и Жордана-Гаусса

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Menus, XPMan, StdCtrls, Grids, unit2;

type

TForm1 = class(TForm)

Coef: TStringGrid;

Gauss: TStringGrid;

Jgauss: TStringGrid;

Button1: TButton;

Button2: TButton;

XPManifest1: TXPManifest;

SaveDialog1: TSaveDialog;

MainMenu1: TMainMenu;

File1: TMenuItem;

New1: TMenuItem;

Save1: TMenuItem;

Exit1: TMenuItem;

Matrix: TStringGrid;

procedure New1Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Save1Click(Sender: TObject);

procedure Exit1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }