VB.NET的题目 利用随机数生成两个4*4的矩阵A~紧急紧急要求,1、分别以下三角和上三角的形式显示矩阵A2、求主对角线和次对角线上各元素之和
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/25 20:58:54
VB.NET的题目 利用随机数生成两个4*4的矩阵A~紧急紧急要求,1、分别以下三角和上三角的形式显示矩阵A2、求主对角线和次对角线上各元素之和
VB.NET的题目 利用随机数生成两个4*4的矩阵A~紧急紧急
要求,1、分别以下三角和上三角的形式显示矩阵A
2、求主对角线和次对角线上各元素之和
VB.NET的题目 利用随机数生成两个4*4的矩阵A~紧急紧急要求,1、分别以下三角和上三角的形式显示矩阵A2、求主对角线和次对角线上各元素之和
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(Int(Rnd() * 10))
Dim n As Integer = 4
Dim i,a As Integer
Dim r As String
Randomize()
For i = 1 To n
r = Int(Rnd() * 10)
Label1.Text &= Space(n - i + 1) & StrDup(i,r) + vbNewLine
Next i
For i = n To 1 Step -1
r = Int(Rnd() * 10)
Label1.Text &= Space(n - i + 1) & StrDup(i,r) + vbNewLine
Next i
For Each c In Label1.Text
If IsNumeric(c) Then
a += 1
End If
Next
MsgBox(a) ‘主对角线和次对角线上各元素之和
End Sub
另一个矩阵也是用同样方法.
你说的是不是这样?