Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
lianadoschik12
24.12.2021 21:40 •
Информатика
Вывести на экран 10 случайных чисел в диапазоне от -100 до 100 и найдите кол-во четных и не четных чисел. pascal
Показать ответ
Ответ:
iirunka153
05.10.2020 02:34
// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-100,100); a.Println;
var n:=a.Where(x->x.IsEven).Count;
Writeln('Четных- ',n,', нечетных- ',10-n)
end.
Пример
44 79 -39 29 -81 -50 33 -96 52 -47
Четных- 4, нечетных- 6
0,0
(0 оценок)
Популярные вопросы: Информатика
aliyashachkasa
11.09.2021 16:41
Вкодировке mac каждый символ кодируется одним байтом. определите количество символов в сообщении, если информационный объем сообщения в этой кодировке равен 560 бит....
кузя216
14.07.2020 03:34
Напишите программу, реализующую игру на угадывание целого числа от 1 до 10. угадываемое число определяется случайно, пользователь вводит предполагаемое значение. если число...
Strelok72
05.06.2020 19:57
Вычислите, сколько минут длится песня «Я на солнышке лежу», если в памяти компьютера она занимает 6000 Кб, частота дискретизации составляет 25600, а разрядность - 16 бит....
Элайза5
02.08.2020 02:37
Влад, даниил и максим купили компьютерные устройства: наушники, колонки и мышь. определи, что купил влад, если истинны высказывания: 1. наушники купил не влад. 2. влад и максим...
АнгелинаМанакова
02.12.2022 21:57
Если в приведенном ниже коде программы а = 486, то найди результат. Определи функции программы. a = int(input()) x=a // 100; y=(a // 10)%10; z=a % 10; b=x * 100 + z; print...
Tenur
09.09.2022 04:42
составить алгоритм. Пользователь вводит два числа. Одно присваивается одной переменной, а второе - другой. Необходимо поменять значения переменных так, чтобы значение первой...
AlinaLove200413
04.08.2022 18:06
8 Запишите на языке Рython арифметические выражения....
vimaa
21.05.2023 02:33
2. Напишите программу, которая при наборе с клавиатуры названия страны выводит на экран название столицыданной страны и численность населения, проживающегоВ ней.(как можно...
dayanaazimbaevа
20.07.2020 01:55
Имеет ли право учитель поставить 2 за то, что я поставил влаг украины на обои на пк на информатике...
svesda2
10.10.2022 15:02
Якими гірськими породами за своїм походження є крейда, вугілля, нафта? А) Магматичні глибинні Б) Магматичні поверхневі В) Осадові уламкові Г) Осадові хімічні Д) Осадові органічні...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-100,100); a.Println;
var n:=a.Where(x->x.IsEven).Count;
Writeln('Четных- ',n,', нечетных- ',10-n)
end.
Пример
44 79 -39 29 -81 -50 33 -96 52 -47
Четных- 4, нечетных- 6