有如下Visual Basic程序段：
Private Sub Test （ ?。?br />Dim i as Integer
Dim Arr（1to 10）As integer
For i=1to 10
Arr（ i ）=i*i
Next i
End Sub
該程序段運(yùn)行后，Arr（ 8 ）的值是6464．
【考點(diǎn)】循環(huán)語(yǔ)句．
【答案】64
【解答】
【點(diǎn)評(píng)】
聲明：本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有，未經(jīng)書面同意，不得復(fù)制發(fā)布。
發(fā)布：2024/4/20 14:35:0組卷：8引用：1難度：0.3
相似題
-
1．如下 Python 程序段：
n=int（input（“請(qǐng)輸入正整數(shù)n：”）） s=“”
while n＞0：t=n%2 s=s+str（t） n=n//2
print（s）
該部分程序段運(yùn)行時(shí)，輸入的值為“12”，則輸出的結(jié)果是（ ?。?/h2>發(fā)布：2024/12/20 10:30:1組卷：0引用：2難度：0.5 -
2．有如下Python 程序段：
執(zhí)行完以上程序段后，輸出的內(nèi)容為（ ?。?/h2>發(fā)布：2024/12/19 18:0:2組卷：1引用：4難度：0.4 -
3．有如下程序段：
Dim s（1 To 81）As Integer,i As Integer,j As Integer,c As Integer,temp As Integer
c=0：s（1）=0
For i=1 To 9
For j=1 To i
temp=s（j*i）
s（j*i）=j*i
If temp＜＞s（j*i） And s（j*i） Mod 9=0 Then c=c+1
Next j
Next i
該程序段運(yùn)行后，變量 C 的值為（ ?。?/h2>發(fā)布：2024/12/20 19:0:1組卷：0引用：2難度：0.5
把好題分享給你的好友吧~~