РЕШИТЬ Напишите программу, которая считывает последовательность из 10 целых чисел и определяет является ли каждое из них четным или нет.
Формат входных данных
На вход программе подаются 10 целых чисел, каждое на отдельной строке.
Формат выходных данных
Программа должна вывести строку «YES», если все числа четные и «NO» в ином случае.
Sample Input 1:
2
4
6
8
10
12
14
16
18
20
Sample Output 1:
YES
Sample Input 2:
1
2
3
4
5
6
7
8
9
10
Sample Output 2:
NO
РЕШИТЕ ОЧЕНЬ НАДО ОЧЕНЬ А ТО МНЕ КАПЕЦ ОТ РОДОКОВ
218
408
Ответы на вопрос:
Pascalabc.net 3.4.2, сборка 1864 от 11.11.2018 внимание! если программа не работает, обновите версию!
begin
var n : = readinteger('количество элементов массива: ');
var x : = readarrinteger('введите массив х: ', n);
var xmin : = x.min;
var a : = x.select(t -> t - xmin).toarray;
a.println
end.
пример количество элементов массива: 5 введите массив х: -18 42 0 -52 140 34 94 52 0 192Популярно: Информатика
-
OLIATIHAJA415.10.2021 13:21
-
Докторгоспарарнери01.05.2020 15:48
-
superrobbot200012.09.2020 09:23
-
PaFaS12318.12.2022 09:57
-
222вовчик22215.06.2020 22:47
-
darova120513.04.2021 16:42
-
SabZero5521.12.2020 15:18
-
zangalievaira09.04.2020 11:45
-
кира67412.04.2023 20:27
-
nikafolz07.03.2020 19:25