Заполнить одномерный массив случайными числами, найти его наименьший элемент. нужно сделать в паскале

Begin 
var a:=ArrRandom(10,-50,50); a.Println; 
Writeln('Наименьший элемент: ',a.Min)
end.