2.2 Из слова курсор путем замены символов получить слово танцор ( програмирование )

program zadacha;var s:string;beginwriteln ('Введите слово "курсор"');readln (s);delete(s,1,4);insert('танц',s,1);writeln(s);end.