Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
krasotkak31
27.03.2023 09:20 •
Информатика
2. напишете программу на языке pascal, которая в массиве из 19 элементов подсчитывает количество элементов меньше 100. массив должен заполняться случайными значениями в интервале от 0 до 200
Показать ответ
Ответ:
zhenianet
03.10.2020 18:26
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var a:=ArrRandom(19,0,200); a.Println;
Writeln('k=',a.Where(x->x<100).Count)
end.
Тестовое решение
127 120 137 75 141 61 116 13 52 180 109 80 91 36 71 191 56 7 108
k=10
0,0
(0 оценок)
Популярные вопросы: Информатика
matematic14
02.12.2021 15:19
с задачкой.В русском языке буква М встречается с вероятностью 0,025, а буква Y - с вероятностью 0,02. Определите количество информации в слове МУМУ ....
Солнышко003
28.05.2023 16:02
Какие оснавные начертания шрифтом используются в текстовом редакторе...
Qwiq
05.10.2022 20:16
Сделать программу в pascalabc ...
Брежний
22.05.2020 11:03
определите, что лишнее в каждой группе, и объясните почему: а) по левому краю, по правому краю, по середине, по ширине; б) да, нет, выступ, отступ; в) полуторный, одинарный,...
nastyabodrova1
18.11.2022 02:38
Вычислите сумму x и y если x=110111(2) y=157(8) результат представьте в двоичной системе...
fainanem
17.02.2021 02:22
Информатика 8 класс! паскаль. 2 ! ...
razdor1996Rqzdor
10.07.2022 18:07
55 кто решит 3 1. vф = 4 кбu = 4096t1 = t2u1 = 512 бит/секv2 = ? кб2 и 3 на фото...
777497
27.03.2021 16:25
Какие трубы обеспечивают лучшую тягу металические или кирпичные...
Кирилл727383
27.03.2021 16:25
Какова соленость индийского и тихого океана....
Olga1618
27.03.2021 16:25
Аграрная реформа столыпина предусматривала а) свободный выход крестьян из общины б) конфискацию помещьечих земель государством в) финансовою поддежку крестьянских общин...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var a:=ArrRandom(19,0,200); a.Println;
Writeln('k=',a.Where(x->x<100).Count)
end.
Тестовое решение
127 120 137 75 141 61 116 13 52 180 109 80 91 36 71 191 56 7 108
k=10