PascalABC. Нужно создать массив из 15 рандомных чисел, ** промежутке чисел от 0 до 30 и...

Question

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

Comments

Т.е не выводить нули?

---

Отрицательных-то чисел нет

---

Да

---

Нужен сам код в решении

---

Ну так я написал Вам программу.

Answer 1

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.