Мне нужна : в паскаль рассмотрим массив t [1..n] - вопрос №94207961 от BarsicX 04.12.2022 17:06

Question

Информатика: Мне нужна : в паскаль рассмотрим массив t [1..n] целых чисел, где n = 20. напишите программу, используя процедуру, которая будет отображать положительные элементы этого массива. заранее.

BarsicX · Answer

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.

Мне нужна : в паскаль рассмотрим массив t [1..n] целых чисел, где n < = 20. напишите программу, и