设有10阶矩阵A，其对角线以上的元素aij均取值为-3，其他矩阵元素为正整数，现在将矩阵A压缩存放在一维树组F[m]中，则 m为（）。A、45B、46C、55D、56
设有10阶矩阵A，其对角线以上的元素aij均取值为-3，其他矩阵元素为正整数，现在将矩阵A压缩存放在一维树组F[m]中，则 m为（）。
- A、45
- B、46
- C、55
- D、56
相关考题：
设有如下程序Option Base 1Private Sub Command1_Click()Dim arrlDim Min As Integer，i As Integerarrl=Array(12，435，76，-24，78，54， 866， 43)Min=____For i=2 To 8If arrl(i)＜Min ThenNext iPrint “最小值是：”；MinEnd Sub以上程序的功能是：用Arcay函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。
下面的程序代码实现将一个一维数组中元素向右循环移动，移位次数由文本框Text输入。例如数组各元素的值依次为0，1，2，3，4，5，6，7，8，9，10；移动三次后，各元素的值依次为8，9，10，0，1，2，3，4，5，6，7。Private Sub Moveright(x()As Integer)Dim i As IntegerDim j As IntegerDim k As Integeri=UBound(x)j=x(i)For k=i To ______ Step-1_______Next kx(LBound(x))=jEnd SubPrivate Sub Command1_Click()Dim a(10)As IntegerDim i As IntegerDim j As IntegerDim k As IntegerFor i=0 To 10a(i)=iNext ij=Val(Text1.Text)k=0Dok=k+1Call MoveRight(a)Loop Until k=jFor i=0 To 10Print a(i)；Next iEnd Sub
设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。Private Sub Commnd1_Click()Dim a(1 To 10)As IntegerDim i As IntegerDim p As IntegerDim t As IntegerDim j As IntegerFor i=1 To 10a(i)=iNext iFor j=1 To 5【 】【 】【 】Next jFor i=1 To 10Print a(i)Next iEnd Sub
请填写下列空白，以实现运行后形成一个主对角线上元素值为1，其他元素为0的6×6阶矩阵。Private Sub Command1_Click（）Dim s（6, 6）For i=1 To 6For j=1 To 6If i=j Then【7】Else【8】End IfPrint 【9】Next jPrintNext iEnd Sub
在窗体上画两个命令按钮，名称分别为Command1、Command2，并编写如下程序 Const n=5,m=4 Dim a(m,n) Private Sub Command1_Click() k=1 For i=1 To m Forj=1 To n a(i,j)=k k=k+1 Next j Next i End Sub Private Sub Command2_Click() summ=0 For i=1 Tom For j=1 To n If i=1 Or i=m Then summ=summ+a(i,j) Else If j=1 Or j=n Then summ=summ+a(i,j) End If End If Next j Next i Print summ End Sub 过程Command1 Click()的作用是在二锥数组a中存放—个m行n列的矩阵；过程Command2 Click()的作用是______。A．计算矩阵外围一圈元素的累加和B．计算矩外围一圈以外的所有元素的累加和C．计算矩阵第1列和最后—列元素的累加和D．计算矩阵第1行和最后—行元素的累加和
以下程序用来建立一个10*10矩阵，该矩阵两条对角线上的元素为1，其余元素为0，请补充完该程序。该程序运行结果见下图。Private Sub Form_ click()Dim s(10, 10) As IntegerFor n = 1 To 10For m = 1 To 10If【 】Or【 】Thens (n, m) = 1Elses (n, m) = 0End IfNext mNext nFor n = 1 To 10For【 】。Picturel. Print Tab(m * 3); s(n, m)Next mPrintNext nEnd Sub
阅读以下说明及Visual Basic程序代码，将应填入(n)处的字句写在对应栏内。[说明]本程序提供了三阶矩阵加、减及乘运算的功能。用户单击“生成操作数”按钮将随机生成两个矩阵(即操作数1和操作数2)，再单击某一矩阵运算按钮后，程序将输出相应运算的结果。程序运行界面如下：开发过程中，界面上从左至右三个文本框分别取名为Text1至Text3，“生成操作数”按钮名为 CmdNew，“+”、“-”和“*”构成按钮控件组，分别名为CmdOperate(0)、CmdOperate(1)和CmdOperate(2)。已知n阶矩阵加、减法运算法则是对应位置的元素相加、减；n阶矩阵的乘法C=AB有公式：Cij=AilBij+AilBij+…+An1Bnj其中记号Xij表示矩阵X第i行第j列上的元素。程序使用的主要变量是三维数组matrix(3，3，3)，其元素matrix(i，j，k)代表第i个矩阵j行k列上的元素，这里i，j，k均从0开始计数，第0、1、2个矩阵分别表示操作数1、操作数2和结果矩阵。代码中用到的子过程及其功能说明如下：(1) Sub newMatrices():随机产生矩阵运算的两个操作数；(2) Sub printOut(txt As TextBox, i As Integcr):定义矩阵i向文本框txt的输出格式；(3) Sub operate(operation As String):计算并输出矩阵运算结果。[Visual Basic代码]Dim matrix(3, 3, 3) As IntegerSub newMatrices()……… End SubSub printOut(txt As TextBox, i As Integer)……… End SubSub operate(operation As String)Dim i, j, k As IntegerFor i = 0 To 2For j = 0 To 2(1)Case"+": matrix(2, i, j) = matrix(0, i, j) + matrix(1, i, j)Case"-": matrix(2, i, j) = matrix(0, i, j) - matrix(1, i, j)Case"*"matrix(2, i, j) = 0For k = 0 To 2matrix(2, i, j) = matrix(2, i, j) +(2)NextEnd SelectNextNextprintOut (3)End SubPrivate Sub CmdNew_Cliek() ’“生成操作数”按钮的单击事件响应代码(4)printout Text1，0printout Text2，1End SubPrivate Sub CmdOperale_Click(Index As Integer) ’矩阵运算按钮组的单击事件响应代码operate CmdOperate(Index).(5)End Sub
有以下程序：int sub(int n) { return(n/10+n%10); }main(){ int x, y;scanf("% d", x);y=sub(sub(sub(x)));printf("% d\n", y);}若运行时输入：1234＜回车＞，程序的输出结果是【 】。
设有以下程序：Option Base 1Private Sub Command1_Click( )Dim arr1 ,Max as Integerart1 = Array(12,435,76,24,78,54,866,43)【 】= arr1(1)For i = 1 To 8If arrl(i)＞Max Then【 】Next iPrint "最大值："； MaxEnd Sub以上程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。
设有如下程序： Private Sub search(a()As Variant，ByVal key As Variant，index%) Dim I％ For I = Lbound(a)To Ubound(A)If key=a(I)Then index=I Exit Sub End If Next I index=-1 End Sub Private Sub Form_Load() Show Dim b()As Variant Dim n As Integer b=Array(21，64，92，15，72，38，45，72) Call search(b， 45， n) Print n End Sub 程序运行后，输出的结果是A．2B．6C．10D．12
一下程序的作用是生成一个10×10的矩阵．该矩阵主对角线上的数据为1，其余数据为0(程序运行结果如下图所示)。该程序不完整，请补充完改程序。Private Sub Command1_Click()Dim a(10，10)As IntegerFor i=1 To【 】For j=1 To 10If【 】Then【 】=1Elsea(i，j)=0End IfNext jNext iFor i =1 To 10For j=1 To 10Print a(i，j)；Next jPrintNext iEnd Sub
设有一个8×8阶的对称矩阵A，为节省存储，将其上三角部分（包括对角线）按列序为主序存放在一堆数组B[1，……，36]中，那么元素a46 在一堆数组B中的存放位置为( )．A．10B．19C．12D．23
下列程序用于输出一个主对角线上元素值为“*”，其他元素值为“”的5×5阶的方阵，试将程序补充完整。Private Sub Command1_Click()Dim x(5, 5)For i = 1 To 5For j = 1 To 5If ______Thenx(i, j) = '*'Else______End IfPrint ______Next jPrintNext iEnd Sub
在窗体上画2个命令按钮，名称分别为Command1、Command2，然后编写下列事件过程。 Const n=5．m=4 Dim a(m，n) Private Sub+Command1 Click（ ） k=1 For i=1 To m For j=1 To n a(i，j)=k k=k+1 Next j Next i End Sub Private Sub Command2 Click（ ） summ=0 For i=1 To m For j=1 To n If i=1 Or i=m Then summ=summ+a(i，j) Else If j=1 Or j=n Then summ=summ+a(i，j) End If End If Next j Next i Print summ End Sub 过程Command1_Click（ ）的作用是在二维数组a中存放1个m行n列的矩阵；过程Command2 Click（ ）的作用是（ ）。A.计算矩阵外围一圈元素的累加和B.计算矩阵除外围一圈以外的所有元素的累加和C.计算矩阵第1列和最后一列元素的累加和D.计算矩阵第1行和最后一行元素的累加和
设有 n 阶三对角矩阵 A，即非零元素都位于主对角线以及与主对角线平行且紧邻的两条对角线上，现对该矩阵进行按行压缩存储，若其压储空间用数组 B 表示，A 的元素下标从 0开始，B 的元素下标从 1 开始。已知 A［0,0］存储在 B［1］，A［n－1，n－1］存储在 B［3n-2］，那么非零元素 A［i,j］（0≤ i＜n，0≤ j＜n，│i-j│≤1）存储在 B（ ）A.2i+j-1B.2i+jC.2i+j+1D.3i-j+1
设有一个10阶的下三角矩阵A(包括对角线)，按照从上到下、从左到右的顺序存储到连续的55个存储单元中，每个数组元素占1个字节的存储空间，则A[5][4]地址与A[0][0]的地址之差为()。A.55B.19C.28D.10
单选题设有函数定义：void sub(int k,char ch){…}则以下对函数sub的调用语句中，正确的是（ ）。Asub(1,97);Bsub(2,'97');Ch=sub(3,'a');Dsub(4,a);
单选题下列测量结果的表示中，错误的是（）。ApIsubS/sub=10.0413A,Usubrel/sub=5×10sup-5/sup，k=2 /pBpIsubS/sub=10.0413（1±5×10sup-5/sup）A，k=2 /pCpIsubS/sub=（10.0413±5×10sup-5/sup）A，k=2 /pDpIsubS/sub=10.0413A,Usub95rel/sub=5×10sup-5/sup，Vsubeff/sub=9 /p
单选题设有一个10阶的下三角矩阵A（包括对角线），按照从上到下、从左到右的顺序存储到连续的55个存储单元中，每个数组元素占1个字节的存储空间，则A[5][4]地址与A[0][0]的地址之差为（）A10B19C28D55
单选题设有一个M*N的矩阵已经存放在一个M行N列的数组x中，且有以下程序段：sum=0;for(i=0;iA矩阵两条对角线元素之和B矩阵所有不靠边元素之和C矩阵所有元素之和D矩阵所有靠边元素之和
填空题若一个n阶矩阵A中的元素满足：Aij=Aji（0=I，j=n-1）则称A为（）矩阵；若主对角线上方（或下方）的所有元素均为零时，称该矩阵为（）。