代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/192256/8392638
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/192256/8392642
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/192256/8392647
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/192256/8392656
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/192256/8392770
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/192256/8392825
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/192256/8392898
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/192256/8392914
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
www.eeworm.com/read/192256/8392975
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/192256/8393045
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