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