Question

составить программу замены "2" на слово "два" через паскаль АВС.net​

Answer 1

Ответ:

program Two;

var

s: string;

begin

Write('Введите строку: ');

ReadLn(s);

s := StringReplace(s, '2', 'два', [rfReplaceAll]);

WriteLn('Измененная строка: ', s);

end.