Есть ответ 👍

РЕШИТЬ Напишите программу, которая считывает последовательность из 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
Посмотреть ответы 1

Ответы на вопрос:

AbrikosiK11
4,4(95 оценок)

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

Популярно: Информатика