20 Ноябрь 2009

В матрице n умноженное на n найти все числа кратные 3

Задачи |  Таги: , , , ,

В матрице n умноженное на n найти все числа кратные 3

For I=1 to N
   For J=1 to N
           If A(I,J) mod 3 =0 then
                    MsgBox "A(" & I & "," & J & ")=" & A(I,J)
           end if
   Next
Next


Оставить комментарий

Я не робот.