Задача. Заменить в тексте слово «ноябрь» на «декабрь». Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.
var s:string;
ns:integer;
begin
readln(s);
ns:=pos('... ',s);{ищем
слово, которое будем заменять}
while ns>0 do {повторяем действия пока в тексте есть
это слово}
begin
... {удалеям
слово}
...('...',s,...);{вставляем новое слово}
...{ищем снова слово}
end;
writeln(s);
end.
СОСТАВЛЕНИЕ ПРОГРАММ
Задание 2. Заменить в тексте слово «ноябрь» на «декабрь». Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.
Задание 4. Заменить в тексте все числа 5 на «пять» и все 7 на «семь»..
Задание 5. Заменить в тексте «осень» на «зима». Учитывая, что слова могут быть записаны с заглавной и строчной букв.
просто топ))))))))))))))))
ОтветитьУдалить