Question

перед каждым символом в тексте поставить точку. Паскаль абц. Текст любой

Answer 1

var

   t : string;

   

begin

   writeln('Введите текст:');

   readln(t);

   t := Regex.Replace(t, '.', '.$0');

   writeln(t);

end.