Upload New File

types.pas

+unit types;
+
+interface
+
+type Grille = record 
+    taille: Integer;
+    lettres: Array [1..6,1..6] of Char;
+    etats: Array [1..6,1..6] of Boolean;
+end;
+
+type Pos = record
+    x, y: Integer;
+end;
+
+implementation
+end.