代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/391726/8386383
pas unit2.pas
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
www.eeworm.com/read/391726/8386454
pas unit2.pas
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
www.eeworm.com/read/391726/8386849
txt pendag.txt
procedure PENDAG(A,B,C,D,E,R:array of real;var U:array of real; N:integer);
var
W,BETA,ALPHA,CG,H:array[0..100] of real;
K:integer;
begin
W[1]:=C[1];
BETA[1]:=0;
BETA[2]:=D[
www.eeworm.com/read/391726/8386864
txt qrbksb.txt
procedure QRBKSB(A:matrx2; N:integer; Q:matrx2; B:array of real;
var X:array of real);
var
I,J:integer; SUM:real;
begin
For I:=1 To N do
www.eeworm.com/read/391726/8386877
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/391726/8387121
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/391726/8387122
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/391726/8387124
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/391726/8387126
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/391726/8387131
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