Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
kamikot
19.02.2021 13:28 •
Информатика
Паскаль дан массив из n элементов. определить количество элементов, которые являются нечетными числами.
Показать ответ
Ответ:
tibefp33org
05.10.2020 21:36
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Нечетных: ',ArrRandom(ReadInteger('n='),-99,99).Println
.Where(x->x.IsOdd).Count)
end.
Пример
n= 15
-91 88 -55 -11 -12 -84 53 86 27 -18 -57 -61 13 -94 -48
Нечетных: 8
0,0
(0 оценок)
Популярные вопросы: Информатика
Вилка68762
20.06.2021 00:20
15. Який з операторів встановлює розмір вікна? 16. Прапорці створюються за до функції... 17.Текстове поле створюють за до функції... 18. Властивість яка задає колір кнопки?...
deasd
20.06.2021 00:20
Яка з перелічиних не є властивостю алгоритму...
alexperovo2006p00qrr
15.07.2022 11:05
Информатика, а тема кодирование информации. ...
аліна55
02.06.2020 00:51
Укажите циклическую конструкцию, при реализации которой возникновение процесса зацикливания исключено. цикл с предусловием цикл с параметром цикл с постусловием...
lasalina
27.03.2020 15:34
WORD. Оформить в соответствии с примером:...
Hedulik
28.04.2020 06:51
Array операторы қандай типке жатады...
safeer
22.08.2022 12:25
Замени приложения словосочетаниями, объясняя правописание наречий:1. Поступил, как товарищ.2. Поступил, как друг.3. Решил подстричься, как прежде.4. Решил одеться, как...
evgen22regiooon
22.08.2022 12:25
Лекция началась в 10ч 30мин. и продолжалась полтора часа,во сколько она закончилась...
vadimnigamaev
22.08.2022 12:25
Какие биохимические процессы в клетке участвуют в превращениях воды, кислорода и углекислого газа? ответ должен быть краткий....
pruzhinskiy01
19.01.2020 07:35
Причина виникнення прямоходіння?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Нечетных: ',ArrRandom(ReadInteger('n='),-99,99).Println
.Where(x->x.IsOdd).Count)
end.
Пример
n= 15
-91 88 -55 -11 -12 -84 53 86 27 -18 -57 -61 13 -94 -48
Нечетных: 8