Однажды программист Вася решил отправить собственному другу письмо. Он досконально поведал

Единожды программер Вася решил послать своему другу письмо. Он подробно рассказал в нем, как у него дела. И, в конце концов, вышло великое послание. Но почта не позволяет пересылать такие великие письма. После длинных размышлений Вася решил его сжать и для этого вымыслил уникальный способ. Если подряд идут несколько схожих знаков, а поточнее три и более, то он их сменяет на их

количество и знак, который повторяется. Но Вася был нехорошим программистом... Помогите ему сжать письмо.

Входные данные: s

Выходные данные:K

Где: S-письмо не более 255 знаков, K-сжатое письмо

Пример ввода: GGHHHHGDDDDHHHKKKKKJJJ

Пример вывода: GG4HG4D3H5K3J

Задать свой вопрос
1 ответ

PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018


begin


 ReadString.AdjacentGroup.SelectMany(t -gt; t.Count gt;= 3 ? (t.Count + t[0]).ToCharArray : t).Println;


end.



Jevelina Slavuta
а есть решинеие на уровне 10 класса? ))))
Алина Жигарина
В программировании нет рассредотачивания на классы, есть только распределение по уровню познаний
Максимка Акситов
На начинающем уровне
Милена
Начинать-то как раз надобно с более сильных конструкций, чтоб не лезть в детали, требующие более глубоких познаний.
Василий Варах
А есть решкние в C++?
Валентина Меткова
Решение есть в любом языке, но его необходимо указывать в вопросе, а не после получения ответа.
Ромка Скрипачев
После Вашего комментария во втором ответе "Необходимо сделвть программку в Pascal ABC по получению данной величины", вопрос про С++ вообщем смешно заучит.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт