let test_random ~m ~n ~c ~nb =
for k = 1 to nb do
afficher_plateau (Resolution.plateau_of_instance (Resolution.creer_instance_random ~m:m ~n:n ~c:c ()));
print_string "\nVoila un exemple d'instance aléatoire.\nContinuons-nous ?";
read_line ();
done;
Graphics.close_graph()