-
Procedure FLEG(X:real; var PL:array of real; NL:integer);
var
J:integer; TWOX,F1,F2,D:real;
begin
PL[1]:=1;
PL[2]:=X;
If NL > 2 Then
begin
TWOX:=2 * X;
F2
http://www.codebf.com/read/168081/5449062
-
unit Unit2;
interface
procedure POLCOE(X, Y:array of real; N:integer; var COF:array of real);
implementation
procedure POLCOE(X, Y:array of real; N:integer; var COF:array of real);
var
S
http://www.codebf.com/read/168081/5449075
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,UNIT1,Dialogs;
procedure POLINT(XA, YA:array of real; N:integer; X:real; var Y, DY:real);
procedure PO
http://www.codebf.com/read/168081/5449080
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure RATINT(XA, YA: array of real; N:integer; X:REAL; VAR Y, DY:real);
implementati
http://www.codebf.com/read/168081/5449089
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure SPLINE(X:array of real;var Y:array of real;
N:integer; YP1
http://www.codebf.com/read/168081/5449095
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure POLINT(XA, YA:array of real; N:integer; X:real; var Y, DY:real);
implementatio
http://www.codebf.com/read/168081/5449100
-
unit Unit2;
interface
uses
unit1;
procedure SPLINE(X:array of real;var Y:array of real;
N:integer; YP1, YPN:real; VAR Y2:array of real);
procedure SPLIE2(X1A, X2A:array of real; YA:
http://www.codebf.com/read/168081/5449104
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
unit1;
procedure SPLINE(X:array of real;var Y:array of real;
N:integer; YP1, Y
http://www.codebf.com/read/168081/5449110
-
unit Unit2;
interface
procedure LOCATE(XX:array of real; N:integer; X:real; var J:integer);
implementation
procedure LOCATE(XX:array of real; N:integer; X:real; var J:integer);
label 10;
var
http://www.codebf.com/read/168081/5449114
-
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure POLINT(XA, YA:array of real; N:integer; X:real; var Y, DY:real);
procedure POLCO
http://www.codebf.com/read/168081/5449127
