Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ITyanI
11.09.2021 07:55 •
Информатика
Паскаль дан массив из n элементов. определить количество элементов, которые являются нечетными числами.
Ответ:
dron1131
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 оценок)
Популярные вопросы: Информатика
Duxa22
11.09.2022 19:42
Определите результат программ. 1.list=[1,2,3,4,5] 2.print(list[1:3])...
Сабина11123
09.03.2023 03:13
Переведите число: а)11010010 в десятичную систему счисления. б)172 в двоичную систему счисления....
LidaDay
03.09.2021 18:06
1. скорость передачи данных через adsl-соединение 128000 бит в секунду. через данное соединение файл размеров 500 кбайт. определите время в секундах. 2.скорость передачи...
Rosa02
03.09.2021 18:06
1)сколько битов составляет 0,5 килобайта? 2)сколько школьных учебников емкостью 350 кбайт можно поместить на трёхдюймовой дискете?...
polatovskiy2002
03.09.2021 18:06
Скорость передачи данных по некоторому каналу связи равна 256000 бит/с, передача данных через это соединение заняла 2 минут. определите информационный объем файла в...
kachakomba
14.08.2021 15:09
Выбери верный ответ. сетевые протоколы — ddp bbb anm qwerty...
ПолумнаПрометей
01.05.2023 04:42
Проанализируйте информацию , поставив вместо вопросительных знаков числа. а) 1 байт = ? бит = 2 в 3 степени б) 213 бит = ? кбайт в) 1 мбайт = ? кбайт = ? байт = ? бит...
ника2761
25.02.2022 13:19
Растровый газетный рисунок состоит из точек четырёх цветов: черного, тёмно-серого, и светло-серого, белого. сколько битов понадобится для двоичного кодирования одного...
leka777166
25.02.2022 13:19
Нужно нарисовать домик в программе кумир, с черепахи. напишите алгоритм...
Aliska00129
03.09.2020 19:50
Напишите как решать ниже на 5 языках программирования записан алгоритм. получив на вход число х, этот алгоритм печатает число l. укажите наибольшее нечетное число х,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
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