Составить программу вывода на экран всех четных - вопрос №9506039 от GeorgHimik2005 25.01.2023 03:16

Question

Информатика: Составить программу вывода на экран всех четных элементов массива со значениями -10 от -10 (паскаль)

GeorgHimik2005 · Answer

PascalABC.NET 3.4.2, сборка 1863 от 10.11.2018Внимание! Если программа не работает, обновите версию!

begin

var a := ArrRandom(ReadInteger('n='), -10, 10);

a.Println;

a.Where(t -> t.IsEven).Println

end.

n= 15-9 2 -2 7 -6 6 -4 -1 2 0 -9 8 -3 -6 -62 -2 -6 6 -4 2 0 8 -6 -6