Урок 17. Задача 9.
Primary tabs
Пользователь вводит исходную строку s.
Ваша программа должна вернуть другую строку, в которой все смежные (соседние) повторяющиеся символы должны быть "удалены" (т.е. повторов в новой строке быть не должно).
var s, s_2 :string; i :integer; begin s := 'b5ghh55788oooggttttt'; s_2 := s[1]; for i := 1 to length(s) do if s[i] <> s[i + 1] then s_2 := s_2 + s[i + 1]; writeln(s_2); end.
- Log in to post comments
- 831 reads
vedro-compota
Thu, 09/08/2022 - 19:27
Permalink
выходить за массив нельзя
выходить за массив нельзя
_____________
матфак вгу и остальная классика =)
Dennis80
Sat, 09/10/2022 - 20:26
Permalink
var s, s_2 :string;
vedro-compota
Sun, 09/11/2022 - 15:17
Permalink
переписать с поддержкой
переписать с поддержкой пустой строки
_____________
матфак вгу и остальная классика =)
Dennis80
Wed, 09/14/2022 - 18:30
Permalink
var s, s_2 :string;
vedro-compota
Wed, 09/14/2022 - 19:40
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)