<h3>PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(7, 10, 15);
a.Println;
var i := a.IndexMin;
Writeln('min a[', i + 1, '] = ', a[i])
end.
<h2>Пример</h2><h3>15 12 10 13 12 13 10</h3><h3>min a[3] = 10</h3>
Индексы 0, 1, 2, 3, 4, 5...
Ответ: A
С аналогией бухгалтерской рабочей книгой
Друга ищи, а найдешь - береги
Старый друг лучше новых двух