代码搜索:Random
找到约 10,000 项符合「Random」的源代码
代码结果 10,000
www.eeworm.com/read/132006/14114831
txt gasdev.txt
Function GASDEV:real;
var
V1,V2,FAC,R:real;
begin
If ISET^= 0 Then
begin
repeat
V1:=2 * Random - 1;
V2:=2 * Random - 1;
R:=Sqr(V1) + Sqr(V2);
u
www.eeworm.com/read/132006/14115536
pas unit2.pas
unit Unit2;
interface
uses
unit1;
Function GASDEV:real;
implementation
Function GASDEV:real;
var
V1,V2,FAC,R:real;
begin
If ISET^= 0 Then
begin
repeat
V1:=2
www.eeworm.com/read/234060/14123784
java dynamicchassisdemo.java
/*
* This source code is part of TWaver 1.3.1
*
* SERVA Software PROPRIETARY/CONFIDENTIAL. Use is subject to license terms.
* Copyright 2000-2005 SERVA Software, Inc. All rights reserved.
*/
www.eeworm.com/read/131795/14125383
dat vb_fun66b.dat
语法
----
Loc(filenumber)
必要的 filenumber 参数是任何一个有效的 Integer 文件号.
说明
----
Loc 函数对各种文件访问方式的返回值如下:
方式 返回值
Random 上一次对文件进行读出或写入的记录号.
Sequential 文件中当前字节位置除以 128 的值.但是,对于顺序文件而言,不会使用 Loc 的返回
www.eeworm.com/read/131795/14125412
dat vb_fun24b.dat
语法
----
EOF(filenumber)
必要的 filenumber 参数是一个 Integer,包含任何有效的文件号.
说明
----
使用 EOF 是为了避免因试图在文件结尾处进行输入而产生的错误.
直到到达文件的结尾,EOF 函数都返回 False.对于为访问 Random 或 Binary 而打开的文件,直到最后一次执行的 Get 语句无法读出完整的记