anchor.diff:    posi, e : integer;
   begin
     clrscr;
  -  write('       ', nomJoueur1, ' : ', scoreJoueur1, ' | ', 
  -          nomJoueur2, ' : ', scoreJoueur2);
  +  write('       ', symJoueur1, ' % ', nomJoueur1, ' : ', scoreJoueur1, ' | ', 
  +         symJoueur2, ' % ', nomJoueur2, ' : ', scoreJoueur2);
     writeln;
     writeln;
     writeln('---|---|---');
  
positive.code:   tab = array [1..9] of string;
    
  var
    countPartie, scoreJoueur1, scoreJoueur2, i   : integer;
    nomJoueur1, nomJoueur2    : string;
    symJoueur1, symJoueur2, rep    : char;
    bool, tourJoueur1, tourJoueur2   : boolean;
    t                         : tab;
    
  procedure joueur(var nom : string; var sym, symJoueur1 : char; nbJoueur : byte) ;
  
negative.code: program tictactoe;
  {
    Simple jeu realise par mohamed Aziz knani
  }
  uses wincrt;
  
  