Выдать максимальный из модулей элементов последовательности. на паскале составьте код и если не трудно блок-схему.

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

begin

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

 a.Println;

 a.Select(t -> Abs(t)).Max.Println

end.

n= 1324 -14 9 -6 43 -4 15 -46 40 -14 -32 45 3246