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()