Les bases du langage Pascal

quentinfaletti Messages postés 3 Date d'inscription mardi 12 octobre 2010 Statut Membre Dernière intervention 13 octobre 2010 - 13 oct. 2010 à 21:26
 medazerty - 1 févr. 2011 à 14:52
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://www.commentcamarche.net/contents/pascal/pascstruct.php3

program lettres;
uses wincrt;

begin
writeln('salut');
end.
program execice1;
uses console; {$R+}
var nom,sexe:string;
begin
writeln('saisir votre nom et votre prémom');
readln(nom);
writeln('saisir votre sexe M pour homme et F pour femme');
readln(sexe);
if (sexe='M') then writeln('Bonjour Monsieur ',nom)
else if (sexe='F') then writeln('Bonjour Madamme/mademoiselle ',nom);
end.