Question

一个具有10个元素的一维数组，下标从1到10，每个元素的值是由随机函数产生的[200，500]之间的随机整数。要

一个具有10个元素的一维数组，下标从1到10，每个元素的值是由随机函数产生的[200，500]之间的随机整数。要求：用Visual Basic语言写一个程序，求出该数组中的最小值及其下标，并输出结果。

Answer 1

大概意思 ，自己完善。

DIM I，K，S，A(10)
FOR I=1 TO 10
A(I)=INT(301*RND()+200)
NEXT I
S=A(1)
K=1
FOR I=2 TO 10
IF A(I)<S THEN
S=A(I)
K=I
END IF
NEXT I
PRINT “最小值为 A(”；K ；“)="；A(K)
END