代码搜索:integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/291891/8389553
pas barunit.pas
unit barunit;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, fcButton, fcImgBtn, fcShapeBtn, ExtCtrls, fcClearPanel,
fcButtonGroup, f
www.eeworm.com/read/192256/8391717
txt mnewt.txt
Procedure MNEWT(NTRIAL:integer;var X:array of real;N:integer;TOLX,TOLF:real);
var
ALPHA:matrx2; BETA,INDX:array[0..15] of real;
K,I:integer; ERRF,ERRX,D:real;
Begin
SetLength(ALPHA,
www.eeworm.com/read/192256/8391843
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes,unit1, Graphics, Controls, Forms, Dialogs;
procedure RKDUMB(VSTART:array of real; NVAR:integer; X1, X2:real;
www.eeworm.com/read/192256/8391854
pas unit2.pas
unit Unit2;
interface
uses
unit1;
procedure RZEXTR(IEST:integer; XEST:real; YEST:array of real;
var YZ, DY:array of real; NV, NUSE:integer);
implementation
proced
www.eeworm.com/read/192256/8391899
pas unit2.pas
unit Unit2;
interface
uses
unit1;
procedure MDIAN1(var X:array of real; N:integer;var XMED:real);
Function GASDEV:real;
implementation
Function GASDEV:real;
var
V1,V2,FAC,R:real;
be
www.eeworm.com/read/192256/8391927
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure CHSTWO(BINS1, BINS2:array of real;
NBINS, KNSTRN:intege
www.eeworm.com/read/192256/8391954
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
procedure CHSONE(BINS, EBINS:array of real; NBINS, KNSTRN:integer;
www.eeworm.com/read/192256/8392360
pas unit2.pas
unit Unit2;
interface
Function GAMMLN(xx:real):real;
Function T(Y:real):real;
procedure IAP(X, A:real; NMAX:integer; VAR F:array of real);
procedure BESIAN(X, A:real; NM, IH:integer; VAR F:arra
www.eeworm.com/read/192256/8392504
pas unit2.pas
unit Unit2;
interface
Function GAMMLN(xx:real):real;
Function T(Y:real):real;
procedure JAP(X, A:real; NMAX:integer; VAR F:array of real);
procedure BESJAN(X, A:real; NM, IH:integer; VAR FF:arr
www.eeworm.com/read/192256/8392611
txt frprmn.txt
Procedure FRPRMN(var P:array of real; N:integer;
FTOL:real;var ITER:integer; var FRET:real);
const
ITMAX = 200; EPS = 0.1e-9;
var
G:array[0..550] of real; H,XI