Kaj,

Envoyé par
gadalla
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| program moins ;
uses WinCrt;
var
c:integer;
begin
repeat
writeln(' donnes le numero de moin');
readln (c);
until c in [1..12] ;
case c of
11,12,1: writeln('c est l hiver');
2,3,4:writeln ('c est le printemps');
5,6,7: writeln ('c est l été ');
8,9,10: writeln('c est l automne');
end;
end. |
Les balises [ code] ?
La mise en forme du code ? (il faut prendre l'habitude de le faire systématiquement, ensuite on finit par le faire sans même y porter attention).
Pour afficher des apostrophes, il faut les doubler dans la chaîne à afficher.
Par exemple
5,6,7: writeln ('c''est l''été ');
Partager