Вывести массив, его минимальный элемент и номер этого элемента в массиве.Массив размерности 50.Помогите пожалуйста!

Индексы в массиве начинаются с 0//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)beginvar a:=arrrandom(50,-20,20);var min:=a[0];var n:=0;a.Println;for var i:=1 to 49 do if a[i]<min then   begin     min:=a[i];n:=i;  end;println('Минимальный в масиве ',a[n],' его индекс ',n);end.