Cоставить программу , которая формирует массив из 8 случайных целых чисел от -20 до 20 и осуществляет поиск минимального элемента .

написано на паскаль абц нет

var ourbox: array [0..7] of integer;      i: integer; begin   for i:=0 to 7 do      begin         ourbox[i]:=Random(1,8);      end;      for i:=0 to 7 do      begin         Writeln(ourbox[i]);      end;end.