38

Помогите создать программу) Найти элемент массива кратный 7 и его индекс. 9 класс…

03 февраля 2023

Помогите создать программу) Найти элемент массива кратный 7 и его индекс. 9 класс Заранее спасибо!

категория: информатика

33

Dim a (10) As Integer 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

Знаете ответ?

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