Заполните массив случайными числами и найдите 2 МИНИМАЛЬНЫХ элемента массива и их номера. Паскаль

Что-то не очень понятно. Могли бы вы написать подробно?

добавила коментарии к каждой строке

//PascalABC.NET 3.1 сборка 1200begin  //  создаем массив и заполняем случайными числами от -50 до 50  var a := ArrRandom(ReadInteger('n='), -50, 50);   //выводим массив    a.Println;  //находим индекс максимального элемента    var max := a.IndexMax();  // выводим значение макс. элемента и его индекса  writeln('Max = ', a[max], ' Index = ', max);  // заменяем максимальный элемент минимумом  a[max] := -50;  //находим индекс второго максимального элемента (на данный момент уже первого)    max := a.IndexMax;  // выводим значение элемента и его индекса  writeln('Max = ', a[max], ' Index = ', max);end.