Составить программу, которая заставляет каждый символ заданного пользователем текста мигать на экране монитора N раз. Весь предыдущий текст на экране не должен исчезать, по принципу стирать и записывать,а не с помощью цвета- Pascal(Паскаль)

uses crt;

var
  s: string;
  n, i, j: byte;

begin
  clrscr;
  s := '1234567890';
  write('n=');
  readln(n);
  textcolor(15);
  clrscr;
  write(s);
  for i := 1 to length(s) do
    for j := 1 to n do
    begin
      gotoxy(i, 1);
      textcolor(0);
      write(s[i]);
      delay(200);
      gotoxy(i, 1);
      textcolor(15);
      write(s[i]);
      delay(200);
    end;
  readln

end.