ПОМОГИТЕ, ПОЖАЛУЙСТА, ПАСКАЛЬ Иван Васильевич пришел ** рынок и решил купить два...

Question

ПОМОГИТЕ, ПОЖАЛУЙСТА, ПАСКАЛЬ Иван Васильевич пришел на рынок и решил купить два арбуза: один для себя, а другой для тещи. Понятно, что для себя нужно выбрать арбуз потяжелей, а для тещи полегче. Но вот незадача: арбузов слишком много и он не знает как же выбрать самый легкий и самый тяжелый арбуз? Помогите ему! Входные данные В первой строке входного файла INPUT.TXT задано одно число N – количество арбузов. Вторая строка содержит N чисел, записанных через пробел. Здесь каждое число – это масса соответствующего арбуза. Все числа натуральные и не превышают 30000. Выходные данные В выходной файл OUTPUT.TXT нужно вывести два числа через пробел: массу арбуза, который Иван Васильевич купит теще и массу арбуза, который он купит себе. INPUT.TXT OUTPUT.TXT 5 1 9 5 1 6 5 9

Answer 1

// PascalABC.NET, запускать по Shift + F9

begin

 Assign(input, 'INPUT.TXT');

 var n := ReadlnInteger;

 var a := ReadArrInteger(n);

 Assign(output, 'OUTPUT.TXT');

 Print(a.Min, a.Max);

end.