Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
danchik56
15.04.2023 13:11 •
Информатика
Вам дан массив а длины н вы можете удалить некоторые элементы из него при этом после всех удалений элементы должны стоять строго возрастаюшем порядке выведите максимальную возможную длину массива после всех удалений
Ответ:
АнастасияХорошистка
07.10.2020 17:00
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(20,-99,99);
var A:=mas.OrderByDescending(t->t).ToArray;
var st:=new Stack<integer>; A.ForEach(t->st.Push(t)); st.Println;
st.Where(t->t < 15).Println;
st.Where(t->t < -20).Println;
Println('Длина после двух удалений =',st.Where(t->t < -20).Count);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Giga45
16.09.2021 20:38
Устройство для считывания и записи информации на диски....
veyper1
15.09.2020 08:13
Составьте программу движения ракеты снизу вверх. pascal abc...
olinikvioletta62
15.09.2020 08:13
Как называется прозрачная нить, используемая для передачи световых сигналов, в том числе и в компьютерных сетях....
альона44в311234
15.09.2020 08:13
Перевести числа в двоичную систему счисления числа : 45; 200...
florzy
26.05.2023 05:51
Написать программу в которой задано целое число n и выводится каждая его цифра в столбец. на abc.pascal...
michukdblack
26.08.2020 01:18
Как найти сумму чисел на паскале с=1/sqr(2)+1/sqr(20)++1/sqr(200000) ?...
violetta238
26.08.2020 01:18
1считая, что каждый символ кодируется одним байтом, определите, чему равен в битах информационный объем следующего высказывания оноре де : ключом ко всякой науке является вопросительный...
MrStepWay
26.08.2020 01:18
Реализовать рекурсивно нахождение в заданном линейном массиве элемента с заданным значением с++(с комментариями );...
KopolbEnufaHtuy
26.08.2020 01:18
Составь алгоритм для опрееделения колва цифр в записи произвального натурального числа )...
Dashe444ki
26.08.2020 01:18
Написать рекурсивную функцию,которая реализует вывод элементов массива c++(с комментариями плз);...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(20,-99,99);
var A:=mas.OrderByDescending(t->t).ToArray;
var st:=new Stack<integer>; A.ForEach(t->st.Push(t)); st.Println;
st.Where(t->t < 15).Println;
st.Where(t->t < -20).Println;
Println('Длина после двух удалений =',st.Where(t->t < -20).Count);
end.