VB x=0 for i =0 to 4,for j =0 to i-1,x=x+(i+j-1),exit for ne
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:数学作业 时间:2024/05/22 07:11:12
VB x=0 for i =0 to 4,for j =0 to i-1,x=x+(i+j-1),exit for next j,next i,print x.
x=0
for i =0 to 4
for j =0 to i-1
x=x+(i+j-1)
exit for
next j
next i
print x
内循环for j=0 to i-1,由于每次当j=0运行后都有个exit for,所以每次只运行了j=0,x=x+i+0-1,就是每次累加了i的值再减去1,i=4时,共累加了x=0-1+1-1+2-1+3-1+4-1=1+2+3+4-4=6
for i =0 to 4
for j =0 to i-1
x=x+(i+j-1)
exit for
next j
next i
print x
内循环for j=0 to i-1,由于每次当j=0运行后都有个exit for,所以每次只运行了j=0,x=x+i+0-1,就是每次累加了i的值再减去1,i=4时,共累加了x=0-1+1-1+2-1+3-1+4-1=1+2+3+4-4=6
VB x=0 for i =0 to 4,for j =0 to i-1,x=x+(i+j-1),exit for ne
求解一道VB private sub command1_click() for i = 1 to 4 x=4 for j
Private Sub Form_click() Dim x,i,j x = 0 For i = 0 To 1 x =
for(j=i;j>0;j--)
For i = 1 To 4 For j = 1 To 5 b(i) = b(i) + a(i,j) Next j Ne
for i=1 to 4 for j= 0 to i print chr$(65 + i) next j print n
Private Sub Command1_Click() For i = 1 To 4 x = 4 For j = 1
vb题,For i=1 to 2 for j=1 to 2 for k=1 to j
dim m(5,5),s(5) for i=1 to 5 s(i)=0 for j=1 to 5 m(i,j)=i+j
Dim x(3,5) As Integer For i = 1 To 3 For j = 1 To 5 x(i,j) =
Private Sub Command1_Click() For i=1 To 4 x=4 For j =1 To 3&
s=0,for i=1 to 5,for j=1 to i,for k=j to 4,s=s+1,next k,next