Отыскать сумму нечётных частей масива (4х4) расположеных выше основной диагонали. В

Отыскать сумму нечётных частей масива (4х4) расположеных выше основной диагонали. В БЕСИК написать программку

Задать свой вопрос
1 ответ

Dim A(4, 4) As Long

Dim S As Long

Dim I As Long

Dim J As Long

For I = 1 To 3

   For J = I + 1 To 4

       If A(I, J) Mod 2 = 1 Then S = S + A(I, J)

   Next J

Next I

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт