上海立信会计学院
班级：12160401 学号：1216000433 姓名：陈学学指导教师：曹锋
系部：金融系专业：国际金融
习题5 p123
1、2、3、4、5、6、7、8
1. 在VB6.0中，数组的下界默认为0，用什么语句可以重新定义数组的默认下界？
vb 字符串转数组答：option base 语句
2．要分配存放12个元素的整型数组，下列数组声明（下界若无，按默认规定）哪些符合要求？
（1）n = 12
Dim a(1 To n) As Integer
（2）Dim a%()
n = 11
ReDim a(n)
（3）Dim a%[2,3]
（4）Dim a(1, 1, 2) As Integer
（5）Dim a%(10)
ReDim a(1 To 12)
（6）Dim a!()
ReDim a(3, 2) As Integer
（7）Dim a%(2, 3)
（8）Dim a(1 To 3, 1 To 4) As Integer
答：2,4,7,8符合要求
3. 程序运行时显示“下标越界”可能产生的错误有哪几种情况？答：引用了不存在的数组元素
下标可能比下标范围大或者小，在应用程序中这一边的数组没有指定范围
4．已知下面的数组声明，写出它的数组名、数组类型、维数、各维的上下界、数组的大小、并按行的顺序列出各元素。
Dim a(-1 To 2,3) As Single
答：数组名：a
数组类型：单精度
维数：二维
各维的下界：-1,0
各维的上界：2,3
数组大小：16
（-1,0），（-1,1），（-1,2），（-1,3）
（0，0），（0,1），（0,2），（0,3）
（1,0）,(1,1),(1,2),(1,3) （2,0），（2,1），（2,2），（2,3）
5．利用随机数生成两个矩阵（数据不一定相同，前者30~70范围、后者101~135）。
⎥⎥⎥⎥⎦
⎤⎢⎢⎢
⎢⎣⎡=3855
69
30
416656473966473350526735
A
⎥⎥⎥⎥⎦
⎤⎢⎢⎢
⎢⎣⎡=130113
109123
118134103111135132127133101125115103B  要求：
（1）将两个矩阵相加结果放入C 矩阵中。 （2）将A 矩阵转置。
（3）统计C 矩阵中最大值和下标。
（4）以下三角形式显示A 矩阵、上三角形式显示B 矩阵。 （5）将A 矩阵的第一行与第三行对应元素交换位置，即第一行元素放到第三行；第三行元素放到第一行。 （6）求A 矩阵两条对角线元素之和。
（7）将A 矩阵按列的次序把各元素放入一维数组D 中，显示结果。
答：dim a(4,4) as integer,b(4,4) as integer,c(4,4 )as integer Randomize Print “矩形A 为：” For i=1 to 4
For j=1 to 4
A(I,j)=int(rnd*41+30)
Print tab(5*j);b(I,j)
Next j
Print
Next i
(1)f or i=1 to 4
for j=1 to 4
c(I,j)=a(I,j)+b(I,j)
next j
next i
(2)f or i=1 to 4
for j=i+1 to 4
t=a(i.j)
a(I,j)=a(j,i)
a(j,i)=t
next j
next i
(3)d im max%,maxi%,maxj%
max=c(1,1);maxi=1;maxj=1 for i=1 to 4
for j=1 to 4
if c(I,j)>max then
max=c(I,j);maxi=I;maxj=j
end if
next j
next i
(4)下三角
for i=1 to 4
for j=1 to i
print a(I,j);spc(2)
next j
print
next i
上三角
For i=1 to 4
For j=I to 4
Print tab(j*5);b(I,j)
Next j
Print
Next i
(5)f or j =1 to 4
t=a(1,j);a(1,j)=a(3,j);a(3,j)=t
next j

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。