用随机函数产生10000个整数,保存在文件中,然后将文件中的所有整数读入一个数组

PrivateSubCommand1_Click()RandomizeDima(10)AsInteger,imasasinteger,iminasinteger,Averageasintegerima

PrivateSubCommand1_Click()Dima%(1To20),max%,min%max=50min=100RandomizeClsFori=1To20a(i)=Int(Rnd*51+5

先说思想：一、用一个数组a[10000]保存结果.二、循环10000次,每次产生第i个数x,(i从0到9999),按顺序插入在a[0..i-1]中适当位置.若已存在相等的数,则重新生成一个数再插入.（

Dima(10)Fori=0To9a(i)=Int(100+100*Rnd)NextiFori=0To8Forj=iTo9Ifa(i)t=a(i)a(i)=a(j)a(j)=tEndIfNextjNe

我已经上机验证过了,正确.思路：产生80个随机数,把这80个随机数由小到大排序,然后从第1个到第80个的顺序挑选偶数,赋值给字符串s1,够10个换行.再从第80个到第1个的顺序挑选奇数,赋值给字符串s

importjava.io.RandomAccessFile;importjava.util.Vector;importsun.misc.Sort;publicclassTestSort{\x05/*

#includevoidmain(){inta[100],i;for(i=0;i

Dimm(99)AsInteger,n(9)AsInteger,iAsInteger,kAsIntegerRandomizeFori=0To99m(i)=Int(Rnd*100)Printm(i);k

dimsasinteger,aasinteger,basinteger,casintegers=Rnd()*900+100a=s\100b=s\100-a*10c=smod100-b*10然后用if判

and()%41-20这样吧

我觉得楼上的是错的!如果不能的话找我!qq776871598那个排序的从第二个和第三个开始吗?第一个怎么办而却循环次数也有歧义!不懂我是不是错的!所以楼主先试验下

#include#include#includeintmain(void){srand(time(0));inti=0;//用于下面的循环inta[20]={0};//用于存储产生的20个随机数.do

这个程序不难,不知你要统计什么呢?

functionsj(i%,a%,b%)aslongDimx%x=Int(Rnd*(b-a+1))+asj=xEndfunctionPrivateSubCommand1_Click()Dimn%,a%

dima(30)fori=1to30a(i)=int(rnd(97+3))ifisprime(a(i))=truethenprinta(i);nextifunctionisprime(xasinteg

andint(1,1,[-3,3]);函数参数说明OUT=RANDINT(M,N,IRANGE);该函数产生一个M×N的随机整数矩阵,1×1就表示一个数了；IRANGE代表范围,IRANGE为一个整数

/>很高兴为你解答答案是：#include <stdio.h> #include <stdlib.h>#include <time

窗体上放个CommandButton和两个Label：PrivateSubCommand1_Click()DimiAsInteger,jAsInteger,nAsIntegerLabel1.Capti

nd()产生一个大于等于0且小于1的随机数要产生[m,n]中随机的整数公式：int((n-m+1)*rnd)+mint(rnd()*1000)表达式产生大于0,小于1000的整数int(rnd()*9

PrivateSubCommand1_Click()DimiAsInteger,xAsInteger,sAsLongRandomizeFori=1To30x=Int(Rnd*100)+1Printx,