Напишите текст программы паскаль скоростной трамвай был не рассчитан на то, что в час пик пассажиры будут в нем не только сидеть, но и стоять. узкий проход между сиденьями едва позволял разминуться двум людям средней комплекции. поэтому пассажиры (и кеша в том числе), которым не хватило сидячих мест, выстроились в цепочку. поскольку каждый пассажир знает, через сколько остановок ему выходить, будем описывать цепочку пассажиров как последовательность целых чисел p1, p2, . . , pn, в которой число pj — это количество остановок, через которое пассажир планирует выйти из трамвая. пассажир #n находится непосредственно у двери трамвая. кеша оказался в этой цепочке на месте #1 и решил заранее выяснить, не стоит ли ему поменяться местами с соседом (или соседями) по цепочке. опишем, что происходит, когда кеша интересуется, когда выходит его сосед справа (т.е. пасса- жир, находящийся на месте #2). если p2 > p1, сосед кеши сразу соглашается поменяться с ним местами, что они и делают. после этого кеша интересуется, когда выходит его новый сосед справа — пассажир, находящийся на месте #3, и процесс продолжается. если p2 ⩽ p1, то пассажир #2 сообщает об этом кеше и местами с ним не меняется. однако начинает спрашивать у своего соседа — пассажира #3, когда выходит тот, и, возможно, меняется с ним местами. разумеется, может быть и так, что своим вопросом пассажир #2 заставит задуматься о проблеме выхода пассажира #3, и тот, в свою очередь, начнёт спрашивать соседа кеша следит за происходящим, и если обнаруживает, что справа от него уже новый сосед, то интересуется уже у него, когда тот выходит, и, возможно, меняется местами уже с ним. конечно же, так поступает не только кеша, но и любой пассажир, который видит, что его сосед справа поменялся с кем-то местами. если два пассажира, стоящих рядом, приняли решение поменяться местами, то они делают это практически мгновенно, так что до ближайшей остановки все желающие поменяться успеют это сделать. ваша — определить, на каком месте в последовательности окажется кеша в момент прибытия трамвая к ближайшей остановке и какое количество обменов произойдёт до этого момента. формат входных данных в первой строке содержится целое число n (1 ⩽ n ⩽ 1000) — количество пассажиров в цепочке. во второй строке содержится n целых чисел p1, p2, . . , pn, где pj (1 ⩽ pj ⩽ 1000, j = 1, 2, . . , n) — количество остановок, через которое планирует выходить пассажир, изначально находящийся на месте #j. формат выходных данных в первой строке выведите два целых числа через пробел — место в последовательности, на ко- тором окажется кеша в результате всех обменов, и количество обменов, которое будет произведено.

139

485

Посмотреть ответы 1

Ответы на вопрос:

Amigo222288

Информатика

4,7(44 оценок)

var mas: array[0..9] of integer; i,max,min,k: integer; arifm: real; begin k: =0; arifm: =0; randomize; for i: =0 to 9 do mas[i]: =random(15); for i: =0 to 9 do write(mas[i],' '); {poisk max} max: =mas[0]; for i: =1 to 9 do if max< mas[i] then max: =mas[i]; {poisk min} min: =mas[0]; for i: =1 to 9 do if min> mas[i] then min: =mas[i]; arifm: =(max+min)/2; writeln('max: ',max); writeln('min: ',min); writeln('arifm: ',arifm: 0: 3); for i: =0 to 9 do if mas[i]< arifm then inc(k); writeln('k: ',k); readln; end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.