以下程序的功能是随机产生10个两位的整数： Option Base 1 Private Sub Command1_Click（) Dim a（10) As Integer Dim i As Integer Randomize For i = 1 To 10a（i) = Int（Rnd * 100) + 1Print a（i) Next i End Sub 运行以上程序，发现有错误，需要对产生随机数

一个两位数的正整数，如果将其个位数与十位数字对调所生成的数称为其对调数，如28是82的对调数。现给定一个两位的正整数46，请找到另一个两位的整数，使这两个数之和等于它们的各自的对调数之和。这样的另一个两位数有多少个。 （）函数用来随机产生一个整数 表达式Int（Rnd*71）+10产生的随机整数范围是（） 随机产生[10，50]之间整数的正确表达式是 若要产生一个三位数的随机整数表达式为（） 补码定点整数 01010101 左移两位后的值为( ) 有一个正整数是两位数，将它减去3，这个两位数是______ 以下()表达式产生一个0~7之间(含0)的随机整数 整数部分是0的最大两位小数与最小一位小数的差是（）。 整数部分是0的最大两位小数与最小一位小数的差是（） 产生[10,37]之间的随机整数的VisualBasic表达式是( )。 要随机产生一个两位数并赋值给y，下面语句正确的是 ______。 要随机产生一个两位数并赋值给y，下面语句正确的是( )。 编写程序实现以下功能：从键盘输入10个整数，按由小到大的顺序输出这10个数 随机生成的10个两位数，求出它们的总和与平均数。产生两位数采用的算法如下：分别产生个位数（0～9)和十位数（1～9)，然后十位数乘10再加上个位数即得到一个两位数。 说明：在窗体上有一个Commandl按钮，单击它将计算10个随机数的和与平均数， 并在窗体上输出平均数。 Private Sub Commandl Click（)Dim m As Integer, n As Integer, sum 下面程序的功能是产生100个小于1000（不含1000) 的随机正整数，并统计其中5的倍数所占比例，但程序不完整，请在[7]和[8]处把程序补充完整。 下列Visual Basic表达式中，能产生一个10到99之间（包括10和99）随机整数的是（）。 以下程序的功能是，产生10个0～1000的随机整数，放入数组Art中，然后输出其中的最大值。请填空。 Option Base 1 Private Sub Form Click（) Dim Arr（10)As Integer Dim Max As Integer Randomize For i=1 To 10 Arr（i)=Int（Rnd*1000) Next i Max= （14) For i= 以下程序的功能是，产生10个0～1000的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。 Option Base 1 Private Sub Form_Click（) Dim Arr（10)As Integer Dim Max As Integer Randomize For i = 1 To 10 Arr（i)= Int（Rnd * 1000) Next i Max = （14) F T功能后面用四位数字表示，前两位是（）号，后两位是（）号。