
Массивы( 4. Найти все элементы кратные 3 или 5. Сколько их? 5. Найти количество всех четных
элементов массива, стоящих на четных местах, то есть имеющих четные номера. Помогите решить

Ответы на вопрос

В обоих случаях предполагается, что есть заполненный массив A с индексами от 1 до n.
i - целочисленная цикловая переменная.
k - целочисленная переменная, куда записывается ответ
4)
k := 0;
for i := 1 to n do
if (A[i] mod 3 = 0) or (A[i] mod 5 = 0) then
begin
write(A[i],' '); {вывод на экран - т.к. требуется найти элементы}
k := k + 1 {элемент учитывается в счетчике}
end;
writeln;
write(k) {количество таких элементов}
5)
k := 0;
for i := 1 to n do
if (A[i] mod 2 = 0) and (i mod 2 = 0) then
k := k + 1;
write(k)



Для решения этой задачи нам нужно создать массив и затем выполнить два шага: сначала найти все элементы, кратные 3 или 5, а затем посчитать количество четных элементов массива, стоящих на четных местах.
Шаг 1: Найти все элементы, кратные 3 или 5 Для этого создадим массив и пройдемся по нему, проверяя каждый элемент на кратность 3 или 5. Если элемент кратен 3 или 5, мы добавим его в новый массив.
Пример кода на JavaScript: ```javascript let array = [1, 3, 5, 6, 9, 10, 12, 15]; let elementsMultipleOfThreeOrFive = array.filter(element => element % 3 === 0 || element % 5 === 0);
console.log(elementsMultipleOfThreeOrFive); console.log("Количество элементов, кратных 3 или 5:", elementsMultipleOfThreeOrFive.length); ```
Шаг 2: Найти количество всех четных элементов массива, стоящих на четных местах Для этого снова пройдемся по массиву, но уже будем проверять четные элементы на четности и считать их количество.
Пример кода на JavaScript: ```javascript let countEvenElementsAtEvenIndexes = 0; for (let i = 0; i < array.length; i += 2) { if (array[i] % 2 === 0) { countEvenElementsAtEvenIndexes++; } }
console.log("Количество четных элементов на четных местах:", countEvenElementsAtEvenIndexes); ```
Таким образом, мы можем найти все элементы, кратные 3 или 5, и посчитать количество четных элементов массива, стоящих на четных местах.


Топ вопросов за вчера в категории Информатика







Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili