2 Utilisation de la primitive « Line »
2 Utilisation de la primitive « Line »

Graphics[Line /@ Subsets[Tuples[{-1, 0, 1}, 2], {2}]]