VB怎么写随机生成10个[1,100]之间的数,并从大到小排列的程序?
题目
VB怎么写随机生成10个[1,100]之间的数,并从大到小排列的程序?
答案
private sub command1_click()
dim a(1 to 10) as integer,i,j
for i=1 to 10
a(i)=int(rnd*100)+1
print a(i);
next
print
for i=1 to 10
for j=1 to i
if a(i)
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- THE EASTER BUNNY IS EATING MY CANDY
- 1把一根48厘米长的铁丝围成一个边长比为4:3:5的直角三角形.这个三角形的边长分别是多少?面积是多少平方厘米?
- 凡物体受到外力都要发生形变吗
- 氯离子能与硝酸共存吗?
- 表示去哪里的路,例如THE WAY TO...,还有什么类似的短语吗?
- 把函数y=2^x的图像按向量a=(2,0)平移,得到y=f(x)的图象,则f(x)=?
- 四川泥石流是不是还是地震的那个地方,是什么原因啊
- 已知a*a+b*b+c*c=ab+bc+ac,求b/a+c/b+a/c=?
- 直线y-ax-1=0和双曲线3x²-y²=1相交于A、B两点.(1)当a为何值时,以AB为直径的圆过原点.(2)是否存在这样的实数a,使得两交点A、B关于y=x对称.若存在,求出a
- My father is becoming back from Japan____two weeks(after:before:when:in)