Deferensial Heun

O... ya, ne da lagi yang penyelesaian PDB nya pake metode Heun, tapi yang ne menurut versi saya.....


var Form1: TForm1;

implementation

{$R *.dfm}


procedure TForm1.Button1Click(Sender: TObject);
var X,Y,H,AY,BY,CY,DY:Real;
I:Integer;

Deferensial Euler

hi lagi... ne yg terbaru sourcecode delphi penyelesaian PDB(persamaan deferensial biasa) menggunakan metode euler...

var Form1: TForm1;
implementation
{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var I,M,N:Integer;
H,X,Y,Y1,F:Real;

eliminasi matriks gauss-jordan

hi .... ne adalah code untuk membuat penyelesaian persamaan linear dengan menggunakan eliminasi matriks gauss-jordan.....


implementation

{$R *.dfm}

procedure TForm1.Edit1Change(Sender: TObject);
begin
stringgrid1.RowCount:=strtoint(edit1.Text);
stringgrid1.colCount:=strtoint(edit1.Text)+1;
end;