2.随机产生10个数存入一维数组a中,求这10数中的最大数并输出.

不是magic吗?

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

'本人亲测可行Private Sub Form_CLICK()    Dim arr(9) As In

command1完成第一题,command2完成第二题PrivateSubCommand1_Click()Dimx%(1To10),n%,i%n=1DoWhilen

#include#include#includeintmain(){inta[15],i,j;srand(time(NULL));for(i=0;i<15;i++)a[i]=rand()%100;fo

帮你写好了,这个是工程文件,下载下来就可以了.以下是源码:PrivateSubCommand1_Click()DimA(10)AsDouble,LAsInteger,BAsDouble,CAsDoub

inta[n],b[n];inti=0,j=0for(i=1;i>k;if(kint(k))continue;if(k%2==0){a[i]=k;i++;}else{b[j]=k;j++;}}cout

dima(9)a(0)=25a(1)=33`````a(9)=99i=int(rnd*10)?a(i)看明白了吗?有问题再HI我再问：输出的三个数要求不重复的呢，你这样的只有一个

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

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

用下面语句：y=rand(1,1000);fori=1:10;x(i)=length(y(y>(i-1)*0.1&y

OptionBase1Dima(20)PrivateSubForm_Load()RandomizeFori=1To10a(i)=Int(10+90*Rnd)NextEndSubPrivateSubCo

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

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

通过SubMain启动Submain()Dima(9)AsInteger,pAsDouble,iAsInteger,nAsIntegerp=0n=0Fori=0To9a(i)=Rnd*100p=p+a

你可以这样嘛先随机产生一个数然后随机产生的第二个数会加上第一个数后面产生的依次加上前一个这样不就可以了或者随机产生5个然后对他们做次排序

Dima(10)AsIntegerDimi%,j%,t%RandomizFori=1To10a(i)=Int(Rnd*90+10)Printa(i);NextPrintFori=1To9Forj=i+

Private Sub Command1_Click()    Dim a%(0 To 19), b

#include <stdlib.h>#include <time.h>#include <stdio.h>void mai

usingSystem;usingSystem.Collections.Generic;usingSystem.Linq;usingSystem.Text;namespaceConsoleApplic