Pascal написать программу обработки массива :Определить малый элемент массива.

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018

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

begin

 var n := ReadInteger('Количество частей массива:');

 var x := ReadArrInteger('Введите массив Х:', n);

 var xMin := x.Min;

 var a := x.Select(t -gt; t - xMin).ToArray;

 a.Println

end.

Пример

Количество частей массива: 5

Введите массив Х: -18 42 0 -52 140

34 94 52 0 192