作业帮 > 综合 > 作业

Dim a1(10),a2(10) For i=1to10 a1(i)=3*i a2(i)=a1(i)*3 Next i

来源：学生作业帮 编辑：灵鹊做题网作业帮 分类：综合作业 时间：2024/05/01 09:03:21
Dim a1(10),a2(10) For i=1to10 a1(i)=3*i a2(i)=a1(i)*3 Next i Text1.Text=Str(a2(i/2-0.1))
Private Sub Command1-Click()
Dim a1(10),a2(10)
For i=1to10
a1(i)=3*i
a2(i)=a1(i)*3
Next i
Text1.Text=Str(a2(i/2-0.1))
End Sub
程序运行后显示（B）
A 36 B 45 C 54 D 63
求讲解
Dim a1(10),a2(10) For i=1to10 a1(i)=3*i a2(i)=a1(i)*3 Next i
for 循环后 i 的值为11
i/2-0.1=5.4
因为识别数组元素的索引只能是整数,所以a2(5.4) 实际就是 a2(5)
a1(5)=3*5=15
a2(5)=a1(5)*3=15*3=45
再问： i=11。。。为什么？
再答： for 1=1 to 10 .... next i 10 以后 i=i+1=11
Dim a1(10),a2(10) For i=1to10 a1(i)=3*i a2(i)=a1(i)*3 Next i 已知ai≠0,(i=1,2,3,4,...2011,2012),满足|a1|/a1+|a2|/a2+|a3|/a3+.. For i=1 To10 Step 2 s=s+i Next i Print i 的 设A1,A2,A3相互独立,且P(Ai)=1/3,i=1,2,3.求A1,A2,A3中 设三阶矩阵A=[a1,a2,a3],其中ai=（i=1,2,3）为A的列向量,且|A|=2,则|[a1+a2,a2,a1 #include class A { public:A(int i,int j) { a1=i; a2=j; } vir 设A=[a1,a2,a3],其中ai(i=1,2,3)是三维列向量,若|A|=1,则|[4a1,2a1-3a2,a3]= 设ai>0,(i=1,2,...,n)求证:(a1+a2+...+an)/n 已知数集A={a1,a2,…ak}具有性质P:对任意i,j(1 已知数列{an},ai属于{-1,0,1}（i=1,2,3,…,2011）,若a1+a2+…+a2011=11,且（a1 设ai>0,（i=1,2,3,……）,求a1+a2+……+ak的极限 怎么理解vb中 dim m(10) for i=1 to 5 m(i)=i*i next i print m(i-1)