Решить задачу в pascalABC : Даны пять чисел. Определить наименьшее из этих чисел. Для проверки: Вход 1)1, 2, 3, 4, 5; 2) 2, -3, 3, 4, 5 3) -1, -2, -5, 0, 1 4) 0, 5, -3, -7, 7 5)-3, -4,...
Решить задачу в pascalABC : Даны пять чисел. Определить наименьшее из этих чисел. Для проверки: Вход 1)1, 2, 3, 4, 5; 2) 2, -3, 3, 4, 5 3) -1, -2, -5, 0, 1 4) 0, 5, -3, -7, 7 5)-3, -4, -5, 9, -10
Выход 1)1 2)-3 3) -5 4) -7 5) -10
Гость
Ответ(ы) на вопрос:
Гость//PascalABC.Net 3.1 сборка 1200
begin
var a:=ReadArrInteger(5);
writeln(a.Min);
end.
Не нашли ответ?
Похожие вопросы