随机产生50个介于1和200之间

PrivateSubForm_Click()Dima(10),b(10),c,d,i,j,NumAsIntegerc=0d=0RandomizeFori=1To10Num=Int(Rnd*10+1)I

#include#include#include#includevoidsushu(int*a);intmain(){inta[50],i;intt=200,d=500;srand(time(NULL

函数不对,正确的应为randbetween()=randbetween(0,50)=randbetween(-2,6)带正负号

PrivateSubCommand1_Click()Dima(50),i,nRandomizeFori=1To50a(i)=Int(Rnd*191)+10Printa(i);IfiMod10=0The

=round(rand()*(7.9-6.5)+6.5,1)=round(rand()*(79-65)+65,0)

就只是一个标点<=你打错了,拓成了中文标点,于是就杯具了.更改一个符号,一切OK：

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

PrivateSubCommand1_Click()RandomizeDima(1To10)Dimmax,min,avemin=50:max=20Fori=1To10a(i)=Int(Rnd*21+3

PrivateSubCommand1_Click()DimIAsInteger,NAsInteger,MaxAsInteger,MinAsIntegerMin=100RandomizeForI=1To

PrivateSubCommand1_Click()DimiAsInteger,nAsInteger,mAsIntegerFori=1To50n=Int(1+Rnd*100)IfnPrintn;m=m

PrivateSubCommand1_Click()RandomizeDima(1To10)Dimmax,min,avemin=50:max=20Fori=1To10a(i)=Int(Rnd*21+3

OptionExplicitPrivateSubForm_Click()'定义i循环变量,imax存放最大数,imin存放最小数,数组ishuz下标为1-10DimiAsLong,imaxAsLong

PrivateSubCommand1_Click()DimArr(9)AsLong'用于存放产生的10随机数DimiAsLongDimnMaxAsLong'用于存放最大的偶数DimnMinAsLong

Subform_click()Dimi(10)Forn=1To10i(n)=Int(Rnd*30+20)Nextmaxnum=20Forn=1To10Ifi(n)>maxnumThenmaxnum=i

C++?C#?再问：C++再答：#include#include#include#include#includeusingnamespacestd;voidgenerator(intnums[],un

选择法：PrivateSubForm_Click()Dimi%,j%,a%(1To10)RandomizeFori=1To10a(i)=Int(101*Rnd)NextiFori=1To9k=iFor

a1=rand(1,6)a=a1/sums(a1)a就是你想要的

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

区间[-π2，π2]上随机取一个数x，当x∈[-π3，π3]时，cosx的值介于12和1之间∴在区间[-π2，π2]上随机取一个数x，cosx的值介于12和1之间的概率P=2π3π=23故答案为：23

#include#includeintmian(void){intarr[50]={0};srand((unsignedint)time(NULL));intnIndex=0;for(;nIndex{