Matriks adalah alat kunci dalam aljabar linear. Salah satu penggunaan matriks adalah merupakan transformasi linier, yang analog lebih tinggi-dimensi fungsi linear dari bentuk f (x) = cx, di mana c adalah suatu konstanta; perkalian matriks sesuai dengan komposisi transformasi linear. Matriks juga dapat melacak koefisien dalam sistem persamaan linier. Untuk matriks persegi, determinan dan invers matriks (jika ada) mengatur perilaku solusi untuk sistem persamaan linier yang sesuai, dan nilai eigen dan vektor eigen memberikan wawasan tentang geometri transformasi linear yang terkait.
Pertanyaannya , bagaimana mengimplementasikan matrix pada console application vb.net.
Inilah jawabannya .
cekidot . !!!
Script di bawah ini merupakan operasi penjumlahan dalam matrix.
silahkan copy paste script berikut pada aplikasi console vb anda .
Module Module1
Sub Main()
Dim x, y, z, a(,), b(,), c(,), i, j As Integer
Console.Write("Masukan Panjang Matrix: ")
i = Console.ReadLine()
Console.Write("Masukan Lebar Matrix: ")
j = Console.ReadLine()
ReDim a(i, j)
ReDim b(i, j)
ReDim c(i, j)
For x = 1 To i
For y = 1 To j
Console.SetCursorPosition(3 * y, 5 + x)
a(x, y) = Console.ReadLine()
Next
Next
z = 3 * j
Console.SetCursorPosition(z + 2, 5 + 1)
Console.WriteLine("+")
For x = 1 To i
For y = 1 To j
Console.SetCursorPosition(2 + z + 3 * y, 5 + x)
b(x, y) = Console.ReadLine()
Next
Next
z = 2 + z + 3 * j
Console.SetCursorPosition(z + 2, 5 + 1)
Console.WriteLine("=")
For x = 1 To i
For y = 1 To j
Console.SetCursorPosition(2 + z + 3 * y, 5 + x)
c(x, y) = a(x, y) + b(x, y)
Console.WriteLine(c(x, y))
Next
Next
Console.ReadKey()
End Sub
End Module
Sub Main()
Dim x, y, z, a(,), b(,), c(,), i, j As Integer
Console.Write("Masukan Panjang Matrix: ")
i = Console.ReadLine()
Console.Write("Masukan Lebar Matrix: ")
j = Console.ReadLine()
ReDim a(i, j)
ReDim b(i, j)
ReDim c(i, j)
For x = 1 To i
For y = 1 To j
Console.SetCursorPosition(3 * y, 5 + x)
a(x, y) = Console.ReadLine()
Next
Next
z = 3 * j
Console.SetCursorPosition(z + 2, 5 + 1)
Console.WriteLine("+")
For x = 1 To i
For y = 1 To j
Console.SetCursorPosition(2 + z + 3 * y, 5 + x)
b(x, y) = Console.ReadLine()
Next
Next
z = 2 + z + 3 * j
Console.SetCursorPosition(z + 2, 5 + 1)
Console.WriteLine("=")
For x = 1 To i
For y = 1 To j
Console.SetCursorPosition(2 + z + 3 * y, 5 + x)
c(x, y) = a(x, y) + b(x, y)
Console.WriteLine(c(x, y))
Next
Next
Console.ReadKey()
End Sub
End Module
mudah-mudahan postingan ini dapat menjawab pertanyaan dari sahabat blogger dan berguna juga untuk yang lain..
selamat mencoba...
Tidak ada komentar:
Posting Komentar