<h3>PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(ReadInteger('n='), -50, 50);
a.Println;
a.Select(t -> Abs(t)).Max.Println
end.
<h2>n= 13</h2><h2>24 -14 9 -6 43 -4 15 -46 40 -14 -32 45 32</h2><h2>46 </h2>
1. Объект: радуга
Модель: рисунок радуги
Свойства: семицветная.
2. Объект: самолет
Модель: макет самолета
Свойства: одинаковая форма, цвет.
3. Объект: яблоко
Модель: муляж яблока
Свойства: одинаковая форма, цвет.
<span>Минимальным объектом, используемым в текстовом процессоре Microsoft Word, является: символ</span>