Problème en pascal
Fermé
rima
-
5 nov. 2007 à 20:24
ZOUARI Messages postés 60 Date d'inscription lundi 26 avril 2004 Statut Contributeur Dernière intervention 14 mai 2011 - 26 nov. 2007 à 16:43
ZOUARI Messages postés 60 Date d'inscription lundi 26 avril 2004 Statut Contributeur Dernière intervention 14 mai 2011 - 26 nov. 2007 à 16:43
A voir également:
- Problème en pascal
- Turbo pascal download - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Dev-pascal - Télécharger - Édition & Programmation
- Turbo pascal linux ✓ - Forum Linux / Unix
- Pascal le grand frere streaming ✓ - Forum Cinéma / Télé
1 réponse
ZOUARI
Messages postés
60
Date d'inscription
lundi 26 avril 2004
Statut
Contributeur
Dernière intervention
14 mai 2011
29
26 nov. 2007 à 16:43
26 nov. 2007 à 16:43
Program verifier;
Uses WintCrt;
Var n : integer;
Begin
If (n MOD 5) = 0 Then Writeln (n ,' est un multiple de 5')
Else Writeln (n,' n"est pas multiple de 5');
End.
Et pour les autres cas il suffit de modidifier la condition
Uses WintCrt;
Var n : integer;
Begin
If (n MOD 5) = 0 Then Writeln (n ,' est un multiple de 5')
Else Writeln (n,' n"est pas multiple de 5');
End.
Et pour les autres cas il suffit de modidifier la condition
