QB编程题编写一个程序:建立一个10乘10的对角线元素为0,其余元素为1的二维数组元素,并将该数组打印出来,成功后改写该
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/04/28 12:13:57
QB编程题
编写一个程序:建立一个10乘10的对角线元素为0,其余元素为1的二维数组元素,并将该数组打印出来,成功后改写该程序,使其对角线元素仍然为0,其余元素为空格字符的二维数组.
编写一个程序:建立一个10乘10的对角线元素为0,其余元素为1的二维数组元素,并将该数组打印出来,成功后改写该程序,使其对角线元素仍然为0,其余元素为空格字符的二维数组.
(1)0与1构成的二维数组:
CLS :n = 1 FOR i = 1 TO 10 FOR j = 1 TO 10 IF i = n AND j = n THEN a(i,j) = 0:a(i,10 - j + 1) = 0 IF i = 5 THEN x = 9 - j - 1 ELSE x = 9 - j
ELSE
IF j x THEN A$(i,j) = " "
END IF
NEXT j
n = n + 1
NEXT i
FOR i = 0 TO 9
FOR j = 0 TO 9
PRINT A$(i,j);
NEXT j
PRINT
NEXT i
END
CLS :n = 1 FOR i = 1 TO 10 FOR j = 1 TO 10 IF i = n AND j = n THEN a(i,j) = 0:a(i,10 - j + 1) = 0 IF i = 5 THEN x = 9 - j - 1 ELSE x = 9 - j
ELSE
IF j x THEN A$(i,j) = " "
END IF
NEXT j
n = n + 1
NEXT i
FOR i = 0 TO 9
FOR j = 0 TO 9
PRINT A$(i,j);
NEXT j
NEXT i
END
QB编程题编写一个程序:建立一个10乘10的对角线元素为0,其余元素为1的二维数组元素,并将该数组打印出来,成功后改写该
生成一个10×10的二维数组,要求该二维数组位于两条对角线上的元素均1,其余均为0,并输出该二维数组
生成一个10×10的二维数组,要求该二维数组位于两条对角线上的元素均1,其余均为0,并输出该二维数组.
vb、编写程序,建立并输出一个10×10的矩阵,该矩阵对角线元素为1,其余元素均为0.
定义一个4*4的二维数组a,请编写程序使数组四周元素为2,其余是1
生成一个10×10的二维数组,要求该二维数组位于两条对角线上的元素均1,其余均为0,
编写程序,建立并输出一个10*10的矩阵,是该矩阵两条对角线上的元素都是1,其余元素为0
编程实现以下功能:打印4行4列的二维数组,其上三角元素均为0,其下三角元素均为1,并将数组元素以4行4列
随机生成一个元素为10到40之间整数的4行5列数组,找出该二维数组的最大元素与最小元素,
vb程序题:将二维数组A中的100个元素分别赋给一维数组B的每个元素并打印出来
编写VB程序,建立并输出一个n×n的矩阵,该矩阵对角线上的元素为4,其余元素均为-1
假定一个二维数组的定义为“int a[3][6];"则该数组所含元素的个数为