В строковую переменную "S" ввести несколько слов. Заменить в строке "S" пробелы на запятые
В строковую переменную "S" ввести несколько слов. Заменить в строке "S" пробелы на запятые
Гость
Ответ(ы) на вопрос:
Гостьprogram asd;
var S:string;
begin
read(s);
while pos(' ', S) <> 0 do
S[pos(' ', S)] := ',';
writeln(s);
end.
Не нашли ответ?
Похожие вопросы