
Тимур
7 год назад
ЛЁГКАЯ ЗАДАЧА ПО ПАСКАЛЮ! Составьте программу, которая позволяет удалить лишние пробелы в строке s, оставив по одному пробелу между словами. Строку s, состоящую из слов, разделённых пробеламі, введите с клавиатуры.
ОТВЕТЫ

Baum
Jul 18, 2019
Var s: string;
begin
writeln(Введите строку:);
readln(s);
while pos( ,s)gt;0 do delete (s,pos( ,s),1);
writeln(s);
end.
Пример:
Введите строку:
Строку s введите с клавиатуры.
Строку s введите с клавиатуры.
begin
writeln(Введите строку:);
readln(s);
while pos( ,s)gt;0 do delete (s,pos( ,s),1);
writeln(s);
end.
Пример:
Введите строку:
Строку s введите с клавиатуры.
Строку s введите с клавиатуры.
182
Смежные вопросы: