dim a(10,10) as integer for i=1 to 10 for j=1to 10 a(i,j)=i*j next j,i print a(2,2)+a(3,3)上面的每一步都是什么意思,麻烦备注出来

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/27 04:25:12
dim a(10,10) as integer for i=1 to 10 for j=1to 10 a(i,j)=i*j next j,i print a(2,2)+a(3,3)上面的每一步都是什么意思,麻烦备注出来
xSKP+w'0HL?P#6!e7L CxYk/xno&&&M{sFYR(RH˕꤀J'HVAhMk1oKH4/nR"zFR2?4mй嗷ĞJ5oҡzQîm-ϤWd5vkzx;jWՇq,iYaUv̻V̫HV&HcVdpEDL2Onݔ/7}YMUd:F( W!Z#Z[RNc%j1~v5ɼKV8#( l.x!P A)wJV‚> ww܏ AsJ>gΣ#$Gb3#b)mtA6#A p?0v zٍd~x1iAb^,:|{ |u-%5`?16%D]!)bITWs\

dim a(10,10) as integer for i=1 to 10 for j=1to 10 a(i,j)=i*j next j,i print a(2,2)+a(3,3)上面的每一步都是什么意思,麻烦备注出来
dim a(10,10) as integer for i=1 to 10 for j=1to 10 a(i,j)=i*j next j,i print a(2,2)+a(3,3)
上面的每一步都是什么意思,麻烦备注出来

dim a(10,10) as integer for i=1 to 10 for j=1to 10 a(i,j)=i*j next j,i print a(2,2)+a(3,3)上面的每一步都是什么意思,麻烦备注出来
太乱了,给你改清楚了.
'定义名称为a的二维数组,内有元素10*10=100个
Dim a(10,10) As Integer
'大循环:以i为变量循环10次
For i = 1 To 10
'小循环:以j为变量循环10次
For j = 1 To 10
'计算i乘以j,把结果按顺序存入数组,每次循环存1个
a(i,j) = i * j
Next i
Next j
'共循环了100次结束.输出数组中某两个元素之和
Print a(2,2) + a(3,3)
你可以把a看成是一张纸
--每次大循环,需要纸上写一行字,每次小循环分10次共写10个字
--一共写10行.
那么最后一句Print a(2,2) + a(3,3) 的意思就是
计算纸上第2行第2个字 + 第3行第3个字的和

Dim a(1 To 10) As Integer Dim i As Integer a(1) = 1 For i = 2 To 10 a(i) = a 一个自然数倒过来读仍是这个数,就叫回文数,有些回文数还是素数,就叫回文式素数,如93239.以下程序用于请补充完善程序.Function hw(m As Long) As Boolean Dim a As Integer, b As Integer, c As Integer, d As Inte vb程序Dim a(1 To 20) As Integer,i As Integer,j As IntegerDim a(1 To 20) As Integer,i As Integer,j As IntegerPrivate Sub Command1_Click()Dim a(1 To 20) As IntegerFor j = 1 To 2For i = 1 To 10a(i) = Int(Rnd * 21) + 20Text1 = Text1 & Str(a(i))Next iTe 我写这个程序时 dim a(10)as interger dim ias interger for i= 10 to 14 a(i)=2i next i 在2i这里出了问 计算机语言里面dim a as integer 这句话的dim是哪个英语单词? 英寸厘米的互换 英寸是输入整数'注:删除①,填入正确的语句Private Sub Command1_Click()Dim a As Singlea = Val(Text1.Text)Text2.Text = a ①End SubPrivate Sub Command1_Click()Dim a As LongFor a = 6005 To ① Step 10If (a Mod 69 = VB编程,一元二次方程a*x^2+b*x+c=0的根Dim a As Double Dim b As Double Dim c As Double Dim delta As Double Dim x1 As Double Dim x2 As Double a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) delta = b * b - VB练习题7道,七道全讲完才行一、Private Sub Command1_Cilck()Dim a(4,4)For i = 1 To 4For j = 1 To 4Next jNext iFor j = 3 To 4For j = 3 To 4Print a(j,i);Next jEnd Sub9 1210 13二、Private Sub Form _Click()Dim a(10),p(3)As Integerk = 5For i 下列选项中,说明A是常量的是哪一项 A.Dim a as integer B.Dim a as long C.Dim a as single D.Const a=3.1 VB随机产生10个不重复的大写英文字母,看看我哪边错了Private Sub Command1_Click()Dim a(1 To 10)Dim flag As Boolean, i%, j%RandomizeFor i = 1 To 10 Do a(i) = Int(26 * Rnd) + 65 flag = False For j = 1 To i - 1 15、执行下面的程序,消息框的输出结果是______.Option Base 1 Private Sub Command1_Click() Dim a(10)15、执行下面的程序,消息框的输出结果是______.Option Base 1Private Sub Command1_Click()Dim a(10),p(3) As Integerk=5For i=1 vb中数据类型 两个double类型的数据相除返回结果如果是很大的小数总是溢出怎么办?Dim x As IntegerFor x = 5 To 14Dim y As IntegerFor y = 51 To 60Dim z As Doublez = (Cells(y,12) / (((Cells(y,8) + Cells(y,9) + Cells(y,10) + C Dim a(9) As Integer,x As Integer,k As Integer,I As Integer RandomizeDo While I 求三位数中,个位数字与十位数字之和除以10所得的余数是百位数字,且百位数字是偶数的数的个数.Private Sub Form_click()Dim s As IntegerDim x As IntegerDim a As IntegerDim b As IntegerDim c As Integers = 0x = 100Do Whi 在Visual Basic中,语句Dim a(1 To 10) As String所定义的数组元素个数是 (A) 1 (B) 9 (C) 10 (D)11该怎么算呢? dim a(3,2) as integer a(3,2)啥意思a(j,i)呢 VB 编写程序,生成10个无重复数(即互不相等)的两位随机数Private Sub Command1_Click()Dim a(10) As Integer,n As IntegerDim i As Integer,k As IntegerRandomizea(1) = Int(Rnd * 90) + 10k = 1Don=___for____if____then exit forNext iif _ dim a,b as interger 其中 a,b定义都是整数吗