Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
ilyadmitriev0
19.08.2021 17:51 •
Информатика
Составить программу определения количества чисел, равных 5, в массиве, элементы которого сформированы датчиком случайных чисел. размер массива 15,диапазон от 0 до 10.
Показать ответ
Ответ:
veronikak3602
31.08.2020 22:21
Да-да, Ваша задача фактически решается в одну строку.
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ArrRandom(15,0,10).Println.Where(x->x=5).Count)
end.
Пример
8 4 4 0 9 1 5 2 0 7 5 3 0 5 3
3
0,0
(0 оценок)
Популярные вопросы: Информатика
Kunpaw
31.01.2023 00:15
Неге фри файр да джекпоттар 200лаки ден кейін түседі...
emiliskenderov
31.07.2022 05:33
Какое значение примет переменная а после выполнения следующего фрагмента алгоритма? на начальное значение а: =2. а: =а; если а 10 то a: =a/2 иначе a: =a*2 конец ветвления a:...
уа43к4к34
31.07.2022 05:33
Какие действия с информацией выполняет внешняя память...
takhtarkina
16.10.2020 05:55
Сколько трёхзначных чисел можно записать с цифр 1,3,5 и 7 при условии, что в записи числа не должно быть одинаковых цифр?...
kurmangazievbeka
20.05.2020 02:18
Самостоятельно подберите источники и подготовьте сообщение об истории стран Северной Европы во второй половине XIX — начале XX в. Какую роль, по вашему...
ksyumikk2003
20.05.2020 02:18
В каком смысле Испания была страной, находящейся на периферии Европы? Сформулируйте социально-экономические и политические причины, которые существенно...
lovevika3
20.05.2020 02:18
Подготовьте сообщение об истории одного из британских доминионов по примерному плану: 1) Географическое положение и природные особенности....
anitamirzikkk
20.05.2020 02:18
Какие проблемы экономического и политического развития были наиболее острыми для Франции в конце XIX в.?...
системаобразования
20.05.2020 02:18
Проследите, как в последней трети XIX — начале XX в. Балканы превратились в «пороховой погреб Европы»....
nastiasteinoxz34d
20.05.2020 02:18
Что общего и в чём вы видите различия в истории стран Западной и Центральной Европы во второй половине XIX — начале XX в.?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ArrRandom(15,0,10).Println.Where(x->x=5).Count)
end.
Пример
8 4 4 0 9 1 5 2 0 7 5 3 0 5 3
3