• Предмет: Информатика
  • Автор: yahinalarisasenya102
  • Вопрос задан 1 год назад

Найти минимальный элемент одномерного массива. Решить задачу с использованием функции.
PascalABC.NET

Ответы

Ответ дал: Koljisto
1

function min(arr:array of integer):integer;

begin

 Result:=arr.Min;

end;

Begin

var arr:=ReadArrInteger(ReadInteger('Введите количество элементов в массиве'));

Print(min(arr));

end.


BobbyFresnel: begin
ReadArrInteger(ReadInteger).Min.Println
end.
Похожие вопросы