.Составить программу, которая печатает таблицу умножения и сложения натуральных чисел в шестнадцатричной системе счисления. В vba

Const heigth = 10 Const width = 10 Sub Ìàêðîñ1()     Dim Sum(heigth - 1, width - 1)     Dim Product(heigth - 1, width - 1)          For i = 0 To heigth - 1         For j = 0 To width - 1             Sum(i, j) = i + j             Product(i, j) = i * j         Next j     Next i          Call Show(Sum, 0, 0)     Call Show(Product, 0, 12) End Sub Sub Show(ByRef m, dx, dy)     For i = 0 To heigth - 1         For j = 0 To width - 1             ActiveSheet.Cells(dx + i + 1, dy + j + 1).Value = Hex(m(i, j))         Next j     Next i End Sub