Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Dianissimolps
30.10.2020 10:29 •
Информатика
Информатика дан массив целых чисел. найти количество нулей
Показать ответ
Ответ:
МарусяПанда2006
06.10.2020 09:14
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-9,9); a.Println;
Writeln('Количество нулей равно ',a.Where(x->x=0).Count)
end.
Пример
n= 25
0 1 5 3 -8 8 3 -9 6 9 2 -1 -6 -8 -1 0 -1 7 5 4 8 -1 4 9 1
Количество нулей равно 2
0,0
(0 оценок)
Популярные вопросы: Информатика
miras39
12.02.2022 07:35
Определите, что будет напечатано в результате работы на следующей программе. Текст программы приведён на алгоритмическом языке Варианты ответов: а) 27 б) 63 в) 81...
меча
03.02.2022 00:08
Кто может быть героем игры? Сколько героев может быть в игре?...
Bibika2005
28.12.2021 16:09
Какая раздница между игровой и концертной сценой?...
sohibjon457
18.10.2020 22:51
Файл размером 3 мбайт передаётся через некоторое соединение за 5 минут. определите время (в минутах), за которое можно передать через это же соединение файл размером...
Help093646
07.12.2021 11:34
Створіть у середовищі субд access 2007 базу даних країни світу за описом, наведенеим у пункті підручника. уведіть дані про пять країн...
Vankoed
09.03.2023 15:57
Какие методы использовали силовиками при проведении операции Метель 86...
maxim1804
07.08.2021 10:59
У морської свинки кудлата шерсть домінує над гладенькою. При схрещуванні кудлатих особин (гомозиготи) з гладенькими в F1 отримали все потомство з кудлатою шерстю....
64bl9j8
21.03.2023 10:35
. Напишите эссе на тему «В чем мудрость Ибрая», используя ПОПС-формулу....
Аля19251
07.08.2021 10:59
Напиши название самого большого океана на земле ...
gabjagYT
28.09.2022 20:09
Свойства растений опыляемые насекомыми...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-9,9); a.Println;
Writeln('Количество нулей равно ',a.Where(x->x=0).Count)
end.
Пример
n= 25
0 1 5 3 -8 8 3 -9 6 9 2 -1 -6 -8 -1 0 -1 7 5 4 8 -1 4 9 1
Количество нулей равно 2