// PascalABC.NET 3.2, сборка 1514 от 11.08.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(8,-50,50); a.Println;
var imin:=a.IndexMin;
Writeln('Минимальный элемент A[',imin+1,']=',a[imin])
end.
Пример
2 22 27 -5 -35 -1 -4 35
Минимальный элемент A[5]=-35