Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
egorovaesya
12.06.2020 01:44 •
Информатика
Дан массив целых чисел B(40). Составить программу для вычисления количества элементов массива, которые кратны 5 .
Ответ:
DorzayS
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 оценок)
Популярные вопросы: Информатика
irnairina89
14.05.2020 21:38
Выведите ошибку по языку java! программа запрашивает число n, затем мы создаем двумерный массив n x n и заполняем их числами. программа должна вывести массив таким образом, как...
straikerfba
03.09.2022 10:58
Может ли замкнуть ноутбук долгово использование?...
MrHelpOnline
12.02.2023 06:24
Lazarus створіть проект для віднімання двох дійсних чисел (real) создайте проект для вычитания двух действительных чисел (real)...
maruha3008
31.10.2021 23:16
1)дано линейное уравнение вида ах=b.если решения этого уравнения не существует, то выведите нет решения.если решение существует,то выводим значение х. 2)даны 3 числа.выясните,существует...
Colaps
03.11.2022 15:09
Сколько нулей в двоичной записи десятичного числа 100?...
1090000
03.11.2022 15:09
Составьте программу на языке паскаль для вычисления площади и периметра трапеции...
алинкаблн
21.02.2023 23:13
Спо паскаль : дан массив размера n. найти и вывести на экран средний элемент массива....
krutoipatan2003
23.06.2022 16:33
8класс,решить ! 1: масса c2 h4 равна 14 граммов.чему равно количество вещества,объём и число молекул? 2: объём h2s равен 5,6л.чему равно количество вещества,масса,число молекул?...
TBONBATYA
23.06.2022 16:33
Развяжите это 2/0.5 = x-4/5 , пряма и обратная пропорциональные зависимости...
Dantebayo
23.06.2022 16:33
Берілген сөйлемдерді present perfect, past simple, past continuous past perfect шақтарына қойып, жақшаны ашыңыздар: 1.my aunt (stay) with us for a week. 2. (stop) it raining yet?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
С ручным заполнением:
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.Пример работы: