начало

Program Example_2;
Uses crt;
Var i:byte;
St,Rez:string;
Begin
Clrscr;
Write ('Введіть текст: ');


помогите з програмкой


Дан текст. Отредактировать его таким образом, чтобы все символы "." были заменены на "...", символы ":" на "-", символы "-" на ":"