如果结果不匹配，请 
更多“表达式 Int（Rnd*10+1) 表示[1,10]闭区间的…”相关的问题
第1题
若已定义：int a[9]，*p=a；并在以后的语句中未改变P的值，不能表示a[1]地址的表达式是（)A．p+1 B．a+
若已定义：int a[9]，*p=a；并在以后的语句中未改变P的值，不能表示a[1]地址的表达式是()
A．p+1
B．a+1
C．＆a[1]
D．*p[1]
第2题
下列程序的功能是：单击窗体时将随机生成10个1～100之间的数，求出它们的总和及平均数。请填空。
Option Base 1 Private Sub Form_Click() Dim a(10)As Integer,i As Integer Dim sum As Integer,aver As Single 【 】 For i=1 To 10 a(i)=Int(100*Rnd)+1 sum=sum+a(i) Next i 【 】 Print sum,aver End Sub
点击查看答案
第3题
要打印出50个在-100～100之间不同的随机整数，并找出第几个是最大数。给定的程序不完整，将程序补充
完整。 Option Base 1 Private Sub Command1_Click() Dim b() Randomize 【 】 Do x=Rnd If x＞0.5 Then y=1 Else y=-1 t=y*Int(Rnd*100)+1 【 】 Do While k＜j If t ＜＞ b(k)Then k = k + 1 Else Exit Do End If Loop If k=j Then ReDim Preserve b(k) b(k)=t Print b(k)； j=j+1 End If Loop Until j＞50 Print 【 】 Max=b(1) For n=2 To 50 If b(n)＞Max Then 【 】 p = n End If Next n Print "最大数是："；Max Print "位置在第"；p；"个" End Sub
点击查看答案
第4题
下列程序的功能是：把一维数组a的元素，每5个元素赋值给二维数组b的每一行。 Private SubComman
d1_Click() Dim a(25)As Integer，b(5，5)As Integer For i=1 To【 】 a(i)=Int(Rnd*25) Print a(i)； Next i Print For i=1 To 5 For i=1 To 5 b(i，j)=【 】 Print b(i，j)； Next j Print Next i End Sub
点击查看答案
第8题
设int x=10，a=0，b=25；，条件表达式x＜1？ a+10:b的值是（)A．0B．1C．10D．25
设int x=10，a=0，b=25；，条件表达式x＜1？ a+10:b的值是()
A．0
B．1
C．10
D．25
