代码搜索:integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/288506/8628104
bas mdubp.bas
Attribute VB_Name = "MduBP"
'BP网算法模块
Option Explicit
Public V(), W() As Double '连接权
Public R(), Q() As Double '阈值
Public z() As Double '输入层输出
Public y() As Double '中间层输出
Public o() As Double '输
www.eeworm.com/read/288506/8628109
bas mdupublic.bas
Attribute VB_Name = "MduPublic"
Option Explicit
Public V(), W() As Double '连接权
Public R(), Q() As Double '阈值
Public z() As Double '输入层输出
Public y() As Double '中间层输出
Public o() As Double '输出层输出
www.eeworm.com/read/288487/8629043
cls classimageprocessing.cls
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'vbNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
www.eeworm.com/read/287977/8655970
bas modcommfun.bas
Attribute VB_Name = "modCommFun"
Option Explicit
Global Const gFIXEDROWS = 1
Public Const gGridBackColor = &H80000018
Public Const gGridForeColor = &H0
Public Const gCellSelBackColor = &H80000001
www.eeworm.com/read/287977/8656032
bas modcommfun.bas
Attribute VB_Name = "modCommFun"
Option Explicit
Global Const gFIXEDROWS = 1
Public Const gGridBackColor = &H80000018
Public Const gGridForeColor = &H0
Public Const gCellSelBackColor = &H80000001
www.eeworm.com/read/387489/8671192
txt simplx.txt
Procedure SIMPLX(var A:matrx2; M, N, MP, NP, M1, M2, M3:integer;
var ICASE:integer;var IZROV, IPOSV:array of integer);
Label 1,2,3,4;
const
EPS =0.000001;
var
L1,L
www.eeworm.com/read/387489/8672498
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics,unit1, Controls, Forms, Dialogs;
Procedure SIMPLX(var A:matrx2; M, N, MP, NP, M1, M2, M3:integer;
www.eeworm.com/read/387489/8672664
txt odeint.txt
procedure ODEINT(var YSTART:array of real; NVAR:integer;X1, X2, EPS,
H1, HMIN:real;var NOK, NBAD:integer;var XP:array of real;var YP:matrx2);
const
MAXSTP = 10000; TWO = 2; ZERO = 0; TINY
www.eeworm.com/read/387489/8672902
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls,unit1, Forms, Dialogs;
Function GASDEV:real;
Procedure SVDVAR(V:matrx2; MA, NP:integer; W:array of real;
www.eeworm.com/read/387489/8673014
txt polcof.txt
procedure POLCOF(XA, YA:array of real; N:integer; var COF:array of real);
var
X, Y:array[0..15] of real;
I,J,K:integer;
XMIN,DY:real;
begin
For J:=1 To N do
begin
X