Друзья, нужна помощь в составлении программы на паскаль Вводим строчку (буквы, цифры, пробелы) с клавиатуры и программа должна найти рядом стоящие символы одинаковые и заменит ь их пробелом. Если к примеру у нас вся строчка из одинаковых символов - то результат - это пустая строчка (одни пробелы) Желательно написать с табуляцией, чтобы понятна была структура проги
ь их пробелом. Если к примеру у нас вся строчка из одинаковых символов - то результат - это пустая строчка (одни пробелы) Желательно написать с табуляцией, чтобы понятна была структура проги
//Pascal ABC.NET 3.1 сборка 1219 Var s,s1:string; i,n:integer; begin readln(s); i:=1; n:=length(s); while i<=n-1 do if s[i]=s[i+1] then begin s1:=s1+; i:=i+2; end else begin s1:=s1+s[i]; inc(i); end; s:=s1; writeln(s); end. Пример ввода: 2 is II, ASCII is encoding. Пример вывода: 2 is , ASC is encoding.
Также наши пользователи интересуются:
Как решить уравнение 5 икс в квадрате минус четыре икс равно нулю Составить 3 предложения про школу
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Друзья, нужна помощь в составлении программы на паскаль Вводим строчку (буквы, цифры, пробелы) с клавиатуры и программа должна найти рядом стоящие символы одинаковые и заменит » от пользователя БОГДАН ГОЛОВ в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!