Exercice en pascal
oosimooo
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
safsoufa -
safsoufa -
Bonjour,
slt je ne sai pas comment corriger cet exercice est ce qu ilk ya quelqu un m aidé please
"afficher un triangle isocele formé d'etoile. la hauteur du triangnle (c'est a dire le nombre de ligne) sera fournie en donnée.on s'arrengera pour que le derniere ligne du triagle s'affiche sur le bord gauche de l'ecran."
merci
slt je ne sai pas comment corriger cet exercice est ce qu ilk ya quelqu un m aidé please
"afficher un triangle isocele formé d'etoile. la hauteur du triangnle (c'est a dire le nombre de ligne) sera fournie en donnée.on s'arrengera pour que le derniere ligne du triagle s'affiche sur le bord gauche de l'ecran."
merci
A voir également:
- Exercice en pascal
- Turbo pascal - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Dev pascal - Télécharger - Édition & Programmation
- Fleur d'encre 5eme corrigé exercice ✓ - Forum PDF
- Maud pascal le grand frère - Forum Cinéma / Télé
3 réponses
bonjour
écrire un programme pascal qui donne la position et la longueur de la plus longue sous chaine formée d'un seul caractère dans une chaine donnée
exemple:aabbbbbcaccc la réponse sera 3,4
3 est la position de la plus longue chaine
4 est la longueur de ce caractère
écrire un programme pascal qui donne la position et la longueur de la plus longue sous chaine formée d'un seul caractère dans une chaine donnée
exemple:aabbbbbcaccc la réponse sera 3,4
3 est la position de la plus longue chaine
4 est la longueur de ce caractère
slt vous peuvez médé a resourdre ce problème simple et jé trouvé presque la solution voici le probleme
saisir une chaine de caractere puis afficher le nombres de ces lettres , de ces chiffres et de ces symboles
voici ce que jé trouvé
program des;
uses wincrt ;
var
ch:string ;
l,s,c,n,i:integer ;
begin
writeln('donner le nombre de caractere de votre chaine de caractere ');
readln(n);
writeln('donner votre chaine de caractere ');
readln(ch);
for i:=1 to n do
begin
if ch[i] in ['0'..'n'] then begin
c:=1 ;
end
else if ch[i] in ([ 'a'..'z']) then begin l:=1
end
else begin s:=1 end;
end;
writeln('le nombre de lettres dans cette chaine de caractere est ',l) ;
writeln('le nombre de ces chiffres est:',c );
writeln('le nombre de symboles est ',s);
end.
saisir une chaine de caractere puis afficher le nombres de ces lettres , de ces chiffres et de ces symboles
voici ce que jé trouvé
program des;
uses wincrt ;
var
ch:string ;
l,s,c,n,i:integer ;
begin
writeln('donner le nombre de caractere de votre chaine de caractere ');
readln(n);
writeln('donner votre chaine de caractere ');
readln(ch);
for i:=1 to n do
begin
if ch[i] in ['0'..'n'] then begin
c:=1 ;
end
else if ch[i] in ([ 'a'..'z']) then begin l:=1
end
else begin s:=1 end;
end;
writeln('le nombre de lettres dans cette chaine de caractere est ',l) ;
writeln('le nombre de ces chiffres est:',c );
writeln('le nombre de symboles est ',s);
end.