Информатика, опубликовано 2018-08-22 22:40:32 by Гость
Дан одномерный массив А(30). Найти все элементы массива, кратные 3 и среди них найти наименьшее. VBA
Ответ оставил Гость
Если массив уже заполнен, то данная задача будет решена следующим фрагментом программы:
For i = 1 To 30
If (A(i) Mod 3) = 0 Then
s = s + Str(A(i)) + "; "
If min > A(i) Then min = A(i)
End If
Next i
MsgBox ("Кратны 3: " & s & min & " - минимальный")
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на