Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
milana23456789
15.08.2020 19:52 •
Информатика
Написать программу в паскале: в массиве из n элементов найти максимальный из отрицательных элементов массива.
Показать ответ
Ответ:
Анастасия4390045
08.10.2020 07:00
//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
Println('Максимальный=',ReadArrInteger(ReadInteger('n->')).Where(t->t<0).Max)
end.
Пример:
n-> 5
-7 8 -6 4 -1
Максимальный= -1
0,0
(0 оценок)
Популярные вопросы: Информатика
BlueSubaru666
23.10.2022 19:29
Сколько среди чисел таких, что в них три различные цифры идут в порядке возрастания или убывания? напечатайте их. (в паскале)...
pn89290448853
09.01.2021 11:43
1. дано: a = 14510, b = 46910. выберите число с, которое отвечает условию a с b. в ответе запишите номер правильного варианта.1) 1000100122) 21483) d7164) 00022....
superpuper82
05.01.2021 12:00
Борис лена и кирилл собрали грибы вместе они собрали n грибов, сколько грибов собрал каждый, если известно, что борис собрали одинаковое количество грибов, а лена...
majm21
08.05.2022 13:56
Сколько бит в 25 кбайт? с решением плз...
Anna45w456
19.11.2020 11:14
Один из первых отечественных персональных компьютеров бк-0010 имел оперативную память 16 кбайт. сколько страниц текста можно было бы разместить в памяти этого компьютера,...
кирилл2127
02.01.2023 05:16
Что выводит на экран данный фрагмент? p: =9; for i: =1 to 10 do begin p: =p*i writeln(p, * ,i, = ,p) end;...
damirsemenov2
23.09.2022 14:18
Почему необходимо иметь общие графические форматы для различных приложений?...
smokenmyr
12.08.2022 23:19
Доступ к файлу index.html, находящемуся на сервере foto.r, осуществляется по протоколу https. b таблице фрагменты адреса файла закодированы буквами от а до ж.запишите...
EllyGriendfil
14.12.2020 15:26
Запишите значение переменной s, полученное в результате работы следующей программы. текст программы на трёх языках программирования. алгоритмический язык бейсик...
ЭлинаКутлуюлова
06.10.2022 20:10
1. Что такое местное время? 2. Сколько одновременно местных времен может существовать на Земле? 3. Сколько часовых зон на территории России? 4. Срединный меридиан...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
//Версия 3.3, сборка 1634 (14.02.2018)
begin
Println('Максимальный=',ReadArrInteger(ReadInteger('n->')).Where(t->t<0).Max)
end.
Пример:
n-> 5
-7 8 -6 4 -1
Максимальный= -1