tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вам дан массив а длины
Вам дан массив а длины н вы можете удалить некоторые элементы из него при этом после всех удалений элементы должны стоять строго возрастаюшем порядке выведите максимальную возможную длину массива после всех удалений
ДарьяРэя
2 15.09.2019 11:20
1
Ответы
vitalytubvitalnru
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
HatryGG
13.05.2020 08:47
Команда для установки фона игры?установка фонового изображения?Программный код для установки фонового изображения ...
Jeinm
13.05.2020 08:48
1.Виды ссылок в документе? 2.Как добавить гиперссылку? 3.чем отличается сноска от гиперссылки? 4.Как в своей работе указать ссылку на автора? 5.Что означает понятие авторское...
marinagrizhuk
13.05.2020 08:48
Написать программу для вывода таблицы умножения на заданное число х. Дано: х, i-параметр цикла, а-произведение. Найти:а Связь:а:=х*i Используйте цикл...
Sem5000
20.10.2020 22:48
мб=2кб(в какой степени) 8кб=2(в какой степени) бит 1024байт=2(в какой степени) бит 1гб= сколько мб...
saida2514
05.10.2021 11:07
Текст в клітинці по замовчуванню розташовується: а)По центру б)По лівій межі в)За шириною г)Опо правій межі...
samininav1
05.10.2021 11:09
10. Области применения современного компьютера многообраз ны. Дайте оценку каждому из перечисленных компьютеров. 1) Компьютер как средство общения. 2) Компьютер для учебы....
0894f
29.09.2019 09:30
Статья, набранная на компьютере, содержит 16 страниц, на каждой странице 40 строк, в каждой строке 40 символов. определите обьём статьи в кодировке windows 1251 в которой...
alpysovat
12.04.2021 10:33
На CD- диск можно записать большим количеством программзаписать текстовую, графическую, звуковую информациюИграть на двух компьютерах...
РевинаМелек
03.12.2020 20:03
1. В России преобладает рельеф: а) горный б) равнинный 2. Наиболее возвышенной частью России является: а) западная (европейская) б) восточная (азиатская) 3. В основании...
Raud1
03.12.2020 20:03
Выпиши грамматические основы предложения: Пароходы ходили с перерывами, и только маяк мигал наугад.а) 1 грамматическая основа: подлежащее:сказуемое:б) 2 грамматическая основа:Д;...
Популярные вопросы
Окружающий мир 4 класс. опиши реку мокша или реку сура! ( по плану) план....
1
Составить предложение со словами или,либо,да=и,но,а,одного,зато,да=но...
3
Сколько будет 23+2+3+4+5+6+8+0+15+371+4+373+173+284=? •5: 40+555•0+5...
2
Сочинение на тему моя семья (типо моё имя (сюда напишу своё) моя фамилия...
1
С. первая : дано: си: решение m=40 тонн g=10 ньютон делённый на кг p-?...
3
25 что значит быть психологом природы ?...
3
Автомобиль едет со скоростью 90 км, время движения 30 мин -пройденное...
3
Футболист, подбрасывая мяч ногой, сообщил ему начальную скорость 20 м\с....
1
Главные герои хрупкой веточке бажов...
1
Упродовца 80 кг яблок первый покупатель приобрёл 10 кг а остальные а...
1
//Внимание! Если программа не работает, обновите версию!
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.