．产生20个0~60的随机整数，放入数组a中，然后在窗体上输出这20个整数中大于30的所有整数之和。

提问：．产生20个0~60的随机整数，放入数组a中，然后在窗体上输出这20个整数中大于30的所有整数之和。

网友回答：

一。你要说明你要用的编程语言

二。可以不用数组
以下是VB的参考（数组a(i)可直接用一个变量代替的）

Private Sub Command1_Click()

Dim a(20) As Integer, s As Integer

 Randomize

  For i = 1 To 20

    a(i) = Int(Rnd * 61)

    If a(i) > 30 Then s = s + a(i)

  Next

  Print s

End Sub