Exercice VB: L'addition de deux matrices A et B de mêmes dimensions N et M
Rédigé par GC Team, Publié le 02 Janvier 2012, Mise à jour le Vendredi, 16 Décembre 2022 22:23Participez au vote ☆☆☆☆☆★★★★★
Objectif :
Travailler avec les Tableaux à deux dimensions.
Travail à Faire :
Ecrire un programme qui réalise l'addition de deux matrices A et B de mêmes dimensions N et M.
Exemple :
/ \ / \ / \
| a b c d | | a' b' c' d | | a + a' b + b' c + c' d + d |
| e f g h | + | e' f' g' h'| = | e + e' f + f' g + g' h + h' |
| i j k l | | i' j' k' l' | | i + i' j + j' k + k' l + l' |
\ / \ / \ /
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 |
Module Module1 Dim i, j, N, M As Integer Sub Main() Console.Write(" N : ") N = Console.ReadLine Console.Write(" M : ") M = Console.ReadLine Dim A(N, M) As String Dim B(N, M) As String Dim A_B(N, M) As String For i = 0 To N - 1 For j = 0 To M - 1 Console.Write("A(" & i + 1 & " ; " & j + 1 & ") = ") A(i, j) = Console.ReadLine Next Next Console.WriteLine(" ") For i = 0 To N - 1 For j = 0 To M - 1 Console.Write("B(" & i + 1 & " ; " & j + 1 & ") = ") B(i, j) = Console.ReadLine Next Next For i = 0 To N - 1 For j = 0 To M - 1 A_B(i, j) = A(i, j) & " + " & B(i, j) Next Next For i = 0 To N - 1 For j = 0 To M - 1 Console.Write(A_B(i, j) & " ") Next Console.WriteLine(" ") Next Console.ReadLine() End Sub End Module |