Probleme langage pascal
Fermé
DimiMAzz
Messages postés
2
Date d'inscription
dimanche 21 octobre 2012
Statut
Membre
Dernière intervention
22 octobre 2012
-
21 oct. 2012 à 11:26
ccm81 Messages postés 10544 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 18 mars 2023 - 21 oct. 2012 à 16:32
ccm81 Messages postés 10544 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 18 mars 2023 - 21 oct. 2012 à 16:32
A voir également:
- Probleme langage pascal
- D langage c ✓ - Forum C
- Turbo pascal download - Télécharger - Édition & Programmation
- Langage ascii - Guide
- My pascal - Télécharger - Édition & Programmation
- Langage linux - Forum Linux / Unix
1 réponse
ccm81
Messages postés
10544
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 mars 2023
2 336
Modifié par ccm81 le 21/10/2012 à 17:30
Modifié par ccm81 le 21/10/2012 à 17:30
bonjour
quelques erreurs
bonne suite
quelques erreurs
Program nombredoccurence;
var mot, lettre : string;
i,k : integer;
Begin
i:=1;
k:=0;
Writeln('Entrez un mot');
Readln(mot);
Writeln('Quel lettre doit on rechercher');
Readln(lettre);
For i:=1 to length(mot) do
Begin
If mot[i]=lettre
then k:=k+1;
End;
Writeln('La lettre ',lettre,' apparait ',k,' fois');
Readln;
End.
bonne suite