3. Дан целочисленный массив, заданный датчиком случайных чисел в интервале от 20 до 55....

Question

3. Дан целочисленный массив, заданный датчиком случайных чисел в интервале от 20 до 55. Найти минимальный элемент и его индекс. Решить в Pascal

Answer 1

Ответ:

PascalABC.NET 3.5.1 + .NET Framework 4.7.1

begin

  var A := ArrRandom(10, 20, 55);

  A.Println;

  A.Min.Println;

  A.IndexOf(A.Min).Println;

end.

Объяснение: