Question

Мне нужна помощь: В паскаль
Рассмотрим массив T [1..n] целых чисел, где n <= 20. Напишите программу, используя процедуру, которая будет отображать положительные элементы этого массива.
Спасибо заранее.

Answer 1

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

procedure ВыводПоложительных(a: array of integer);

begin

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

end;

begin

 var T := ArrRandom(ReadInteger('n='), -50, 50);

 T.Println;

 ВыводПоложительных(T)

end.

Answer 2

Хорошо,я подожду до завтра может найдется человек который мне поможет

Answer 3

Одна строка. Просто тут она свернулась из-за длины.

Answer 4

Конечно. Может и найдется.

Answer 5

Спасибо большое что постарался мне помочь.

Answer 6

привет