PASCAL СРОЧНОООО
Дан массив N<100 целых чисел. Вывести все четные элементы массива по возрастанию.

Ответы

Ответ дал: Аноним
0
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  a.Where(t->t.IsEven).OrderBy(t->t).Println
end.

Пример
n= 20
15 36 27 -4 47 -20 42 -3 -27 32 15 -38 25 -2 -5 -29 12 2 -2 13
-38 -20 -4 -2 -2 2 12 32 36 42
Вас заинтересует