Введите строку. преобразуйте строку таким образом, чтобы после каждой цифры "2" стояли три символа "! " выведите преобразованную строку на экран. pascal

'+
         copy(s,i+1,length(s)-i+3);
      i:=i+3;
    end;
    i:=i+1;
  end;
  writeln('новая строка:  ',s);
  end.