Bonjour à tous,
Alors voila j'ai un programme à faire (en ada), mais depuis deux heures je suis en train de chercher et rien ne marche .
Alors si quelqu'un pouvais m'aider en me faisant vite fait le corps de l'algorithme, je lui en serait très reconnaissant .

Donc voila l'objectif du programme : l'utilisateur doit saisir une phrase, et le programme doit indiquer quel est le mot le plus long. Il faut utiliser les boucles.

d'avance.

Aidez moi

Tu sais personne ne te croiras, mets ton code et on pourra t'aider.

quel code ? le programme que j'ai fait et qui marche pas ? ou mon algorithme ?

Bah tes tentatives de programme.

ok ; donc voilà (c'est la seule tentative que j'ai gardée) :

phrase, car, motactuel, maxactuel : chaine ;
idx : natural :=0 ;

begin

preintln("Entrer une chaine de caractère : ") ;
read(phrase) ;
maxactuel:=create(" ") ;

for idx in 1..length(phrase) loop
car:=substring(phrase, idx, 1) ;
if(car/=" ") then
motactuel:=motactuel & car ;
end if ;
if car=" " and idx=length(phrase)-1 then
maxactuel:=motactuel ;
end if ;
end loop ;
preintln("Le plus grand mot est" & max actuel) ;
end exo ;

Voilà

Je te donne l'algo mais te laisse l'implémenter

---------------

variables :
entiers : nbrCara, maxCara, i
chaine de caractere : chaine_saisi_par_utilisateur

->Tu met maxCara à la valeur 0

-> Pour i allant de 1 au nombre de caractère saisi par l'utilisateur (tu dois avoir une fonction pour avoir la longueur d'une chaine)

->.Tu vas lire un mot,pour cela tu vas lire caractère par caractères : donc TANT QUE tu n'es pas en train de lire un espace, tu incrémente nbrCara.
.Des que tu sors de ce while, tu compare nbrCara et maxCara.
Si nbrCara > maxCara alors tu met nbrCara dans maxCara et tu met nbrCara à 0.
Sinon tu ne fais que remettre nbrCara à 0.

->.Fin de la première boucle qui allait de 1 au nombre de caractère.
. Affiche maxCara

--------------------------
Voila j'espere avoir pu t'aider et ne pas avori fais de fautes mais je pense que cet algo est bon.
Bonne journée

beaucoup je vais voir ça .