Вопрос по информатике:
10. Дана последовательность из n целых чисел. Найти сумму минимального и максимального элементов в этой последовательности
Пожаловаться
- 01.03.2018 19:10
- Информатика
- remove_red_eye 6182
- thumb_up 13
Ответы и объяснения 1
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
Writeln('Искомая сумма равна ',a.Min+a.Max)
end.
Пример
n= 13
-49 -32 14 -47 9 -23 39 -16 -44 2 -48 -48 -27
Искомая сумма равна -10
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
Writeln('Искомая сумма равна ',a.Min+a.Max)
end.
Пример
n= 13
-49 -32 14 -47 9 -23 39 -16 -44 2 -48 -48 -27
Искомая сумма равна -10
Пожаловаться
- 02.03.2018 14:09
- thumb_up 8
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы