[Algo] fonction TrouveCarDansStr (Caract : in caractere, Chaine : in string, Debut : in entier_naturel) renvoie entier_naturel debut declarer i : entier_naturel; i <- Debut; tant_que (i != taille(Chaine) ET_ALORS Caract ne_vaut_pas Chaine [i]) faire i <- i +1; ffaire renvoie i; fin algorithme TestDeTrouveCarDansStr debut declarer Str : string; Str <- "Salut ca va?"; afficher (TrouveCarDansStr ('a', Str, 0)); ligne_suivante; afficher (TrouveCarDansStr ('a', Str, 3)); ligne_suivante; afficher (TrouveCarDansStr ('a', Str, 6)); ligne_suivante; afficher (TrouveCarDansStr ('b', Str, 6)); ligne_suivante; fin [/Algo]