Exemplo de um breve animação

program animacao;
uses crt;
begin
   textcolor(10);
   clrscr;
   writeln;
   write('(Í');
   delay(500);
   clreol;
   write('ÍÍÍ');
   delay(500);
   clreol;
   write('ÍÍÍÍ)');
   delay(500);
   end.