Заполнить массив случайными числами от 1 до 50 и вывести количество чётных и нечётных чисел в массиве.
152
484
Ответы на вопрос:
Pascalabc.net 3.3.5, сборка 1640 от 17.03.2018 внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n='),1,50); a.println; var k: =a.where(t-> t.isodd).count; writeln('четных ',a.length-k,', нечетных ',k) end. пример n= 17 45 42 36 34 47 15 3 16 47 35 14 13 3 45 28 31 16 четных 7, нечетных 10
7больших желтых яблок все груши большие значит яблок больших 32-17=15 всего плодов 25+17=42 из них 28 желтых значит зеленых 42-28=14 зеленых яблок на 2 больше чем зеленых груш значит яблок зеленых 8 а груш 6 зеленые яблоки все большие значит 15-8=7 ответ 7
Популярно: Информатика
-
ninachka197727.11.2021 20:26
-
Рабка04.02.2023 00:16
-
Ирина1512301028.01.2022 06:48
-
danilpetuhuv0308.07.2020 15:23
-
Subina0005.11.2021 23:52
-
Кауру26.12.2022 08:16
-
artemdolgin6907.03.2020 22:41
-
Hicka18.03.2022 06:47
-
Mariecharlaii21.02.2023 04:44
-
кирилл207126.02.2023 12:49