1. ввести с клавиатуры число n . заполнить вектор из n элементов случайными числ ами в диапазоне от 100 до 999. вывести элементы вектора через пробел и найти минимальный элемент и сумму .

PascalABC.NET 3.4

begin
  var a:=ArrRandom(ReadInteger('n='),100,999); a.Println;
  Writeln('min=',a.Min,'   sum=',a.Sum)
end.