Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Krosarik
27.05.2022 00:03 •
Информатика
Дан массив целых чисел B(40). Составить программу для вычисления количества элементов массива, которые кратны 5 .
Показать ответ
Ответ:
школота90
24.08.2020 22:59
PascalABC.NET
С ручным заполнением:
begin Print('Количество:', ReadArrInteger(40).Count(x->x mod 5 = 0) );end.
С рандомным заполнением:
beginvar b := ArrRandom(40,0,100); b.Println; Print('Количество:', b.Count(x->x mod 5 = 0) );end.
Пример работы:
0,0
(0 оценок)
Популярные вопросы: Информатика
р0000
08.09.2022 00:46
В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 8, 4, 3, 0, 7, 2, 1, 5, 9, 6 соответственно, т.е. A[0]=8,...
SvinkaPeppa777
14.01.2020 20:44
Отримати на комп ютері зі слова інформатика нові слова. Наприклад форма , мама , формат , рама .Вхідні дані:const d= інформатика Надо составить программу Блок схема:...
mandarin50
23.08.2022 10:15
Что видите в этой рисунке, опишите * Мой ответ...
2katena
12.06.2021 05:40
Программа обрабатывает одномерный целочисленный массив Dat: i 1 2 3 4 5 6 7 8 9 10 Dat[i] 70 80 90 100 80 40 40 70 80 90 Определите, какие числа будут выведены в результате...
КристинаШпиц
06.07.2021 20:28
сделать программу в паскале (по информатике).Задание:Увеличить все элементы линейной таблицы М(200) в 3 раза....
vlados22354
24.09.2022 07:43
С++ Дано 4 числа: a,b,c,d. Найдите разность между суммой всех чисел в интервале [a;b] и суммой всех чисел в интервале [c;d].Формат входных данныхВ единственной строке...
nurbibisaidova3
20.12.2022 11:18
Укажите возможные ввода данных в таблицу базы данных.Ввод данных в таблицу в режиме Конструктора .Ввод через форму.Ввод через отчёт.Ввод в таблицу в режиме Ввод и редактирование...
babchykalinka
29.11.2021 11:31
Задача кумир цикл n раз 2 задача...
DrozZzD
31.05.2020 08:09
Об’єкт титульного слайда, у якому вказано назву презентації...
Dashaqqq123
01.10.2022 23:36
Захід, на якому відбувається представлення чогось нового групі осіб...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
С ручным заполнением:
begin Print('Количество:', ReadArrInteger(40).Count(x->x mod 5 = 0) );end.С рандомным заполнением:
beginvar b := ArrRandom(40,0,100); b.Println; Print('Количество:', b.Count(x->x mod 5 = 0) );end.Пример работы: