Функция возвращающая минимальный элемент массива размером до 50 элементов

108

233

Посмотреть ответы 2

Ответы на вопрос:

ObraztsovaOlga

Информатика

4,5(90 оценок)

Вообще-то в pascalabc.net такая функция сто лет не нужна, но // pascalabc.net 3.2, сборка 1485 от 15.06.2017 // внимание! если программа не работает, обновите версию! function amin(a: array of integer): =a.min; function amin(a: array of real): =a.min; begin var a: =arrrandom(readinteger('n=',50); a.println; writeln('min=',amin(a)); var b: =arrrandomreal(readinteger('m=',10); b.println; writeln('min=',amin(b)); end. пример n= 15 -5 11 -6 -46 1 -44 -37 -6 -12 -16 -29 50 2 -12 14 min=-46 m= 4 3.23076070902439 0.991638028524648 -6.15073071613476 9.34790070138308 min=-6.15073071613476