Accueil     Soft. MacOSX     Soft. MacOS/PC     PHP     Python     ROMS GBA     TP d'info     DBZ-GT     Martingales     Galeries     Liens     @  

Exercice 1

program exo1;
type
sujet = (le_chat, toto);
verbe = (cherche, prend, cache);
adverbe = (soigneusement, encore);
complement = (le_bonbon, la_souris);

var
{ il n'y a pas de: integer :-) }
s: sujet;
v: verbe;
a: adverbe;
c: complement;

begin
writeln('Exercice1 - www.Software-DS.com');
writeln;
writeln('Remarque (Timan): on ne peut pas utiliser le chat, donc on doit');
writeln('utiliser le_chat d''ou la debilite de ne pas utiliser d''entier.');
writeln('Personnellemnt je n''utilise jamais ce genre de type, et');
writeln('je n''ai jamais trouve de code source qui utilise ce genre de type !');
writeln;
for s := le_chat to toto do
for v := cherche to cache do
for a := soigneusement to encore do
for c := le_bonbon to la_souris do
begin
write(s, ' ', v, ' ', a, ' ', c, '.');
writeln;
end;
writeln;
writeln('©2001 All Rights Reserved to www.Software-DS.com');
{ ©2001 All Rights Reserved to http://www.Software-DS.com 16/10/01 }
end.





Haut de la page - Page précédente - Page générée en 0.00168 sec.
Recherche personnalisée
 

1845018 visiteurs.   ©2001-2023 All Rights Reserved to Software-DS.com
Made with a mac  
Confidentialité