Напишите ,,программы. нужно. 1. дана последовательность чисел.найти числа кратные 2. 2. дана последовательность чисел.вывести первые 2 элемента,которые должны быть чётные.

Snezhok1407 Snezhok1407    2   29.08.2019 03:20    0

Ответы
Бата194 Бата194  09.09.2020 12:21
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  ArrRandom(ReadInteger('n='),-99,99).Println.Where(x->x.IsEven).
           Println.Take(2).Println;
end.

Пример
n= 15
45 38 43 77 -41 -49 36 98 -29 93 9 34 9 -74 53
38 36 98 34 -74
38 36
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика