## Mathematica: looping using Module

Dear all,

I have difficulty to solve this code which involves looping,

In [1] := m = 1; n = 1 ; A = -1 ; B = 5 ;
In [2] := m = 1; n = 3 ; A = 8 ; B = -2 ;
In [3] := m = 1; n = 5 ; A = 9 ; B = 7 ;
In [4] := m = 3; n = 1 ; A = -2 ; B = 8 ;
In [5] := m = 3; n = 3 ; A = 4 ; B = 3 ;
In [6] := m = 3; n = 5 ; A = 9 ; B = -1 ;
In [7] := m = 5; n = 1 ; A = 6 ; B = 9 ;
In [8] := m = 5; n = 3 ; A = 2 ; B = 1 ;
In [9] := m = 5; n = 5 ; A = 3 ; B = -7 ;

Method 1:
In [10] := qsolve := Module[{mat, A, B, m, n}, Table[mat = A + B, {m, 1, 5, 2}, {n, 1, 5, 2}]]

Method 2:
In [11] := qsolve := Module[{mat, A, B, m, n}, Clear[mat,A,B]; Do[mat = A + B; Print[mat], {m, 1, 5, 2}, {n, 1, 5, 2}]]

I have tried to use both method1 and method2 but still failed.

Iam expecting the answer to be {4,6,16},{6,7,8},{15,3,-4}

Please let me know how to fix this code.

Many thanks for any help.
 PhysOrg.com science news on PhysOrg.com >> King Richard III found in 'untidy lozenge-shaped grave'>> Google Drive sports new view and scan enhancements>> Researcher admits mistakes in stem cell study