Exercice VB: L'addition de deux matrices A et B de mêmes dimensions N et M
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' |
\ / \ / \ /
| 12345678910111213141516171819202122232425262728293031323334353637 | Module Module1Dim i, j, N, M As IntegerSub Main()Console.Write(" N : ")N = Console.ReadLineConsole.Write(" M : ")M = Console.ReadLineDim A(N, M) As StringDim B(N, M) As StringDim A_B(N, M) As StringFor i = 0 To N - 1For j = 0 To M - 1Console.Write("A(" & i + 1 & " ; " & j + 1 & ") = ")A(i, j) = Console.ReadLineNextNextConsole.WriteLine(" ")For i = 0 To N - 1For j = 0 To M - 1Console.Write("B(" & i + 1 & " ; " & j + 1 & ") = ")B(i, j) = Console.ReadLineNextNextFor i = 0 To N - 1For j = 0 To M - 1A_B(i, j) = A(i, j) & " + " & B(i, j)NextNextFor i = 0 To N - 1For j = 0 To M - 1Console.Write(A_B(i, j) & " ")NextConsole.WriteLine(" ")NextConsole.ReadLine()End SubEnd Module |