Помогите создать программу)
Найти элемент массива кратный 7 и его индекс.
9 класс
Заранее спасибо!
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Dim max, ind As Integer
max = 0
ind = -1
For i As Integer = 0 To 10
If (a(i) mod 7)=0 Then
max = a(i)
ind = i
Exit For
End If
Next