Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
pustovoytenko1
14.02.2021 11:30 •
Информатика
10. дана последовательность из n целых чисел. найти сумму минимального и максимального элементов в этой последовательности
Показать ответ
Ответ:
irkaveerova
10.08.2020 18:02
// 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
0,0
(0 оценок)
Популярные вопросы: Информатика
adeelyaa3333
09.07.2022 13:19
Вшколе 800 учащихся, коды учащихся записаны в школьной информационной системе с минимального количества бит.каков информационный объём сообщения о кодах 320 учащихся,...
Emulov
06.02.2022 17:11
сделать нужно скоро закончится урок ...
denishustov
25.07.2021 12:59
Какова функция стрелок, которые соединяют фигуры блок-схемы?А) Указывают на наиболее важные действияБ) Указывают последовательность действийВ) Указывают исполнителя...
irochkakarpenkp0bint
29.04.2021 21:56
2) Посчитать произведение нечётных натуральных от 9 до k чисел, где k вводится с клавиатуры 3) Посчитать сумму цифр нечётных двузначных чисел(например, 21-нечетное...
vladaplakhotya
06.04.2021 23:08
Ветвление на ЯП ПаскальПоказать, на примере, как в программе используется условие в виде ветвления...
TatyanaKras
08.11.2020 09:18
При каком значении переменной а переменная s=3? readIng(a); s:=0; while a 0 do begin a:=a-1; s:=s+1; end;...
альбина350
22.01.2022 20:06
Програма Куб Дано довжину ребра куба знайти його обєм та площу всієї поверхні.Це задача для самостійного розв язанняобем куба дорівнює кубу довжини його ребра.Поверхня...
Vitas40
25.03.2022 14:36
От 1. Какие признаки свидетельствуют о том, что произошла химическая реакция? 2. Объясните реакцию между железом и медного купороса (Сульфат меди) с точки зрения атомно-молекулярного...
vikylyalol
13.02.2021 13:06
Четырехрядная коса сокращает длину полос примерно на...
ккк127
14.07.2022 00:12
9.Тақырыптардың бірін таңдап, ойығды өрбітіп жаз. Шығармашылық жұмыста ұрпақтар сабақтастығына, шығарманың жаңашылдығына өз көзқарасыңды білдір. [6] 1. Махамбеттің...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
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