Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ZhenyaKan11
13.04.2023 16:45 •
Информатика
Составить программу определения количества чисел, равных 5, в массиве, элементы которого сформированы датчиком случайных чисел. размер массива 15,диапазон от 0 до 10.
Ответ:
ZayacZnaniy
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 оценок)
Популярные вопросы: Информатика
Leola1
27.11.2020 02:48
Подсчитайте информационный объем текста в килобайтах набранного с пк что текст занимает 15 страниц на каждой странице 30 строк, в кажлой строке 10 символов...
Tasik3
07.07.2022 13:12
Реферат, набранный на компьютере, содержит 16 страниц, на каждой странице 50 строк и его вес 100 кб. для кодирования символов используется кодировка unicode при которой мощность...
refddk
26.10.2022 03:09
Электронные часы сломались так,что в одной ячейке стали отображаться два числа.какие? а.) 8 и 9 б.) 0 и 2 в.) 1 и 6 г.) 4 и 7...
Йцвсмпнремьливвьс
17.02.2020 17:25
7-3-5 вводится целое число n. Выведите следующее за ним четное числоСДЕЛАТЬ В ПРОГРАММЕ КУМИР только алгначкон ...
Glitchyyy
16.09.2022 17:16
Дано: writeln (s:6:2);Если S = 113,63685, то на экранепоявитсяответить!...
Gendalf1875
29.11.2021 16:35
2000надо перевести в двоичную систему счисления...
Ketti08
29.11.2021 16:35
Старые часы отстают на 20 секунд вчас. скольво времени они покажут через сутки после того, как стрелки устонавили на 12 часов...
muslim38
13.02.2022 19:12
Әр қайталаған сайын суды шайқап отырса, судың ... арта түседі. 1мөлшері 2энергиясы 3қасиеті 4көлемі...
лабтвб
04.12.2021 09:56
Выполни действие: (4/9х-у)(4/9х+у)...
ggwpbro
08.05.2022 06:24
какова абсолютная влажность воздуха при температуре 20градусов, если относительная влажность воздуха 80%...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// 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