代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/387489/8672348
txt chobsb.txt
procedure CHOBSB(A:MATRX2; N:integer; D:array of real;var B:array of real);
var
I,J:integer; SUM:real;
begin
For I:=1 To N do
begin
Sum:=B[I];
For J:=1 To I - 1 do
www.eeworm.com/read/387489/8672644
txt rkdumb.txt
procedure RKDUMB(VSTART:array of real; NVAR:integer; X1, X2:real;
NSTEP:integer;var XX:array of real; Y:matrx2);
var
V,DV:array[0..10] of real; I,K:integer; X,H:re
www.eeworm.com/read/387489/8672648
txt pzextr.txt
procedure PZEXTR(IEST:integer; XEST:real; YEST:array of real;
var YZ, DY:array of real; NV, NUSE:integer);
var
D:array[0..10] of real; J,K1,M1:integer;
Q,DELTA
www.eeworm.com/read/387489/8672651
txt rk4.txt
procedure RK4(Y,DYDX:array of real;N:integer;X,H:real;var YOUT:array of real);
var
YT, DYT, DYM:array[0..10] of real; HH,H6,XH:real;
I:integer;
begin
HH:=H * 0.5;
H6:=H / 6;
www.eeworm.com/read/387489/8672654
txt mmid.txt
procedure MMID(Y, DYDX:array of real; NVAR:integer; XS, HTOT:real;
NSTEP:integer;var YOUT:array of real);
var
YM, YN:array[0..10] of real; I,N:integer; H,X
www.eeworm.com/read/387489/8672662
txt rzextr.txt
procedure RZEXTR(IEST:integer; XEST:real; YEST:array of real;
var YZ, DY:array of real; NV, NUSE:integer);
var
FX:array[0..7] of real; J,M1,K:integer;
YY,V,C,B
www.eeworm.com/read/387489/8672669
txt bsstep.txt
procedure BSSTEP(var Y, DYDX:array of real; NV:integer; var X1:real;
HTRY, EPS:real;YSCAL:array of real; var HDID, HEND:real);
label 1;
const
IMAX = 11; NUSE = 7; ONE = 1; S
www.eeworm.com/read/387489/8672757
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
Function PLGNDR(L, M:integer; X:real):real;
Procedure FLEG(X:real; var PL:array of real; N
www.eeworm.com/read/387489/8672807
pas unit2.pas
unit Unit2;
interface
uses
unit1;
Procedure SVDVAR(V:matrx2; MA, NP:integer; W:array of real;
var CVM:matrx2; NCVM:integer);
implementation
Procedure SVDVAR(V:matrx2; MA,
www.eeworm.com/read/387489/8672830
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, unit1,Forms, Dialogs;
Function GASDEV:real;
Procedure MRQMIN(var X,Y,SIG:array of real; NDATA:integer;var