Софія133
03.05.2022 12:31

1
шарики
петя вспомнил окоробке с цветными шариками и стал придумывать игру. все шарики
выставил в линию. и стал рассматривать шарики слева направо. когда обнаруживал непрерывную
цепочку из трех и более шариков одного цвета, то удалял эти шарики из линии. все оставшиеся
шарики после удаления сдвигал друг к другу, и повторял описанную операцио до тех пор, пока
было возможно. игра занимала много времени, и он решил написать компьютерную программу.
напишите и вы программу, которая определяет, сколько шариков будет удалено и какие
шарики останутся.
формат входного файла
в первой строке вводится количество шариков в цепочке (не более 1000). -
во второй строке цвета шариков (от 0 до 9, камедому цвету соответствует свое целое число).
формат выходного файла
в первой строке требуется вывести количество шариков, которое будет удалено.
во второй строке цвета оставшихся шариков или ничего, если все шарики были удалены.
пример:
input.txt
output.txt
18
16
5 5 5 5 5 4 4 4 4 8 8
88
2 отношение​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Маша2005051
08.07.2021 11:24
Program Ves;
Var a1,a2,a3,a4,t1,t2,t3,p,d,vp,b: Integer;
begin 
writeln ('программа вычисляет норму для данного ученика');
writeln ('введи массу учебника 1');readln (a1);
writeln ('введи массу учебника 2');readln (a2);
writeln ('введи массу учебника 3');readln (a3);
writeln ('введи массу тетради 1');readln (t1);
writeln ('введи массу тетради 2');readln (t2);
writeln ('введи массу тетради 3');readln (t3);
writeln ('введи массу пенала');readln (p);
writeln ('введи массу дневника');readln (d);
writeln ('введи массу портфеля');readln(vp);
b:=a1+a2+a3+a4+t1+t2+t3+p+d+vp;writeln ('общая масса портфеля= ' b);
if (b<=5) then writeln ('норма') else writeln ('ненорма');
readln;
end.
0,0(0 оценок)
Ответ:
amaykovska
08.07.2021 11:24
Летающий автобус)
1. Мест в эконом-классе 120, а в бизнес-классе 40.
2. 100 процентов прибыли получим, если заполним все места. Билет в эконом-классе стоит в 2 раза меньше чем X. Получаем следующее уравнение:
40*X + 0.5*120*X = 100%, X = 1% от всей прибыли.  Значит один билет в бизнес - классе приносит один процент прибыли. А один билет в эконом-классе приносит 0.5 процента прибыли.
3. Осталось рассчитать прибыль компании учитывая непроданные билеты:
P = 100 - b - 0.5*a  и написать программу:

var a,b:integer;
begin
  repeat
    writeln('Введите количество непроданных билетов (a,b)');
    readln(a,b);
  until (a<=120) and (b<=40)and (a>=0) and (b>=0);
  writeln('Прибыль компании составит ',100-b-0.5*a,'%');
end.

 
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота