代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/391726/8385985
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/391726/8386087
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
www.eeworm.com/read/391726/8386116
txt trapzd.txt
implementation
procedure TRAPZD(A, B:real;var S:real; N:integer);
var
J,IT:integer;
TNM,DEL,X,SUM:real;
begin
If N = 1 Then
begin
S:=0.5 * (B - A) * (FUNC(A) + FUNC(B))
www.eeworm.com/read/391726/8386118
txt midpnt.txt
procedure MIDPNT(A, B:real;var S:real; N:integer);
var
TNM,DEL,DDEL,X,SUM:real;
J,IT:integer;
begin
If N = 1 Then
begin
S:=(B - A) * FUNC(0.5 * (A + B));
IT:=1;
www.eeworm.com/read/391726/8386122
txt midinf.txt
Function INF(X:real):real;
begin
INF:=FUNC(1 / X) / Sqr(X);
End;
procedure MIDINF(AA, BB:real; var S:real; N:integer);
var
A,B,TNM,X,DEL,DDEL,SUM:real; J:integer;
begin
B:=1 / AA;
www.eeworm.com/read/391726/8386127
txt midexp.txt
procedure MIDEXP(AA,BB:real; var S:real;N:integer);
var
IT,J:integer; A,B,DEL,DDEL,SUM,TNM,X:real;
begin
FUNC(X)=FUNK(-ALn(X))/X;
B:= EXP(-AA);
A:= 0.0;
IF N = 1
www.eeworm.com/read/391726/8386224
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls,unit1, Forms, Dialogs;
procedure SSOR(A:matrx2; N:integer; B:array of real;
var X:arr
www.eeworm.com/read/391726/8386267
pas unit2.pas
unit Unit2;
interface
procedure TRIDAG(A, B, C, R:array of real;var U:array of real; N:integer);
implementation
procedure TRIDAG(A, B, C, R:array of real;var U:array of real; N:integer);
var
www.eeworm.com/read/391726/8386347
txt fpoly.txt
Procedure FPOLY(X:real; var P:array of real; NP:integer);
var
J:integer;
begin
P[1]:=1;
For J:=2 To NP do
P[J]:=P[J - 1] * X;
end;
www.eeworm.com/read/391726/8386354
txt mrqcof.txt
Procedure MRQCOF(X,Y,SIG:array of real; NDATA:integer;var A:array of real;
MA:integer; LISTA:array of integer; MFIT:integer;var ALPHA:matrx2;
var BETA:array of real; NALP