Чтобы в Pascal заменить в строке одну подстроку на другую, применяют метод stringReplace(): stringReplace(original, old, new, flag): в строке originalString подстрока old заменяется на new, flag принимает одно из значений rfReplaceAll или rfIgnoreCase, записываемое в квадратных скобках. В первом случае заменяются все вхождения old в originalString, во втором - только первое.
Пример замены в строке в Pascal:
phone = '+1-234-567-89-10' // дефисы меняются на пробелы edited_phone := stringreplace(phone, '-', ' ', [rfReplaceAll]); writeln(edited_phone); // +1 234 567 89 10 // дефисы удаляются edited_phone := stringreplace(phone, '-', '', [rfReplaceAll]); writeln(edited_phone); // +12345678910 // меняется только первый дефис edited_phone := replace(phone, '-', '', [rfIgnoreCase]); writeln(edited_phone); // +1234-567-89-10
Дана строка. Замените в этой строке все цифры 1 на слово one.
1
one
Вводится строка.
Выведите ответ на задачу.
1000 ms 256 Mb Правила оформления программ и список ошибок при автоматической проверке задач