Programme pour supprimer les mots contenant la lettre " i "
Lerikal
-
Chekchak Messages postés 39 Statut Membre -
Chekchak Messages postés 39 Statut Membre -
Bonjour, je suis actuellement en apprentissage hier dans le code Pascal
Je voudrai élaborer un programe qui me permet de supprimer tout les mots contenant la lettre "i" en cliquant sur un bouton
Pouvez-vous m'aidez s'il vous plaît
Je voudrai élaborer un programe qui me permet de supprimer tout les mots contenant la lettre "i" en cliquant sur un bouton
Pouvez-vous m'aidez s'il vous plaît
procedure TFPrincipal.btnDisparitionClick(Sender: TObject);
begin
//
end;
1 réponse
-
i:=1;
while(i<n) do
begin
while (ch[i]=' ')do
begin
i:=i+1;
end;
e:=0; cpt:=0;
while(ch[i]<>' ')do
begin
if(ch[i]='i') do
begin
e:=1;
i:=i+1;
end;
cpt:=cpt+1;
end;
if (e=1) do
begin
j:=i-cpt;
while(j<i)do
begin
ch[j]:=' '; j:=j+1;
end;
end;
end;
{ je les ai pas supprimé mais je les ai remplacé par des espaces ' '}