Составить программу вывода на экран всех четных - вопрос №9505871 от Margaritka1307 17.10.2020 05:51

Question

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

Margaritka1307 · 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