Написать программу,которая возвращает функцию нахождения минимального элемента любого...

Question

Написать программу,которая возвращает функцию нахождения минимального элемента любого целочисленного элемента

Answer 1

Function min(a: array of integer): integer;
var i, m: integer;
begin
     for i := 0 to length(a) do
         if (a[i] < m) then m := a[i];
     result := m;
end;

Вот, в теории должно работать, но проверить, извините, не могу, PascalABC не поддерживает передачу массивов><</span>

Answer 2

Быть может, написать программу, функция которой возвращает найденный минимальный элемент целочисленного массива?