求VB编程:给一个5*5的矩阵赋值,要求矩阵副对角线上方元素都是偶数,副对角线和它下方元素都为奇数.
来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/06/09 15:26:34
求VB编程:给一个5*5的矩阵赋值,要求矩阵副对角线上方元素都是偶数,副对角线和它下方元素都为奇数.
Private Sub Command1_Click()
Dim mArr(1 To 5, 1 To 5), r%, c%, tmp%
For r = 1 To 5
For c = 1 To 5
Randomize
tmp = Int(Rnd * 90) + 10
If c > r Then
Do While tmp Mod 2 = 1
Randomize
tmp = Int(Rnd * 90) + 10
Loop
Else
Do While tmp Mod 2 = 0
Randomize
tmp = Int(Rnd * 90) + 10
Loop
End If
mArr(r, c) = tmp
Print mArr(r, c);
Next c
Print
Next r
End Su
Dim mArr(1 To 5, 1 To 5), r%, c%, tmp%
For r = 1 To 5
For c = 1 To 5
Randomize
tmp = Int(Rnd * 90) + 10
If c > r Then
Do While tmp Mod 2 = 1
Randomize
tmp = Int(Rnd * 90) + 10
Loop
Else
Do While tmp Mod 2 = 0
Randomize
tmp = Int(Rnd * 90) + 10
Loop
End If
mArr(r, c) = tmp
Print mArr(r, c);
Next c
Next r
End Su
求VB编程:给一个5*5的矩阵赋值,要求矩阵副对角线上方元素都是偶数,副对角线和它下方元素都为奇数.
随机生成一个5*5的整数矩阵,该矩阵的副对角线上方元素都是两位偶数,副对角线和它的下方元素都为奇数.
随即生成一个5*5的整数矩阵,该矩阵的副对角线上方元素是两位偶数,下方元素是奇数~
对一个5*5矩阵,要求将主对角线元素和副对角线元素赋值0,其余元素赋值1,并输出该矩阵
求一个整型矩阵A3*3 的主对角线和次(副)对角线元素之积
从键盘输入5*5阶的矩阵,编程实现:求主对角线和次对角线上行下标和列下标均为偶数的各元素之积
输入5×5的矩阵,编程实现:求两对角线上行、列下标均为偶数的各元素之和
从键盘输入4×4矩阵,并求此矩阵主对角线元素积与副对角线元素积的差
C语言编程:将一个4×4的整型矩阵元素按副对角线(右上到左下)互换.
矩阵 副对角线以上的元素全为零的三角形矩阵叫什么
副对角线元素不为零,其余元素均为零的矩阵叫什么?
用数组编程,分别求5*5矩阵的正对角线元素的和、反对角线元素的和