Pascalabc. нужно создать массив из 15 рандомных - вопрос №938613615 от alholod2p00me0 02.06.2020 19:43

Question

Информатика: Pascalabc. нужно создать массив из 15 рандомных чисел, на промежутке чисел от 0 до 30 и вывести положительные значения.

alholod2p00me0 · Answer

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

begin

var a := ArrRandom(15, 0, 30);

a.Println;

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

end.