Ребят сделайте пожалуйста программу в паскале. Вводится любое количество чисел определяемое пользователем и надо из этих чисел вывести наименьшии числа

// PascalABC.NET 3.2, сборка 1374 от 10.01.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Укажите количество чисел:');  var a:=ReadArrReal('Вводите: ',n);  var m:=a.Min;  Writeln(a.Where(x->x=m))end.ПримерУкажите количество чисел: 6Вводите:  -3 2.4 -7 0 -7 3[-7,-7]