Allow to command different things (pizza, bevarages) in a school cafeteria (open at lunch time) using uniquely the arrows of the keyboard and make the total to pay automatically
Delphi & Pascal (česká wiki)
Kategória: KMP (Klub mladých programátorov)
Program: Cafet.pas
Súbor exe: Cafet.exe
Potrebné: Cafet.lst
Program: Cafet.pas
Súbor exe: Cafet.exe
Potrebné: Cafet.lst
Allow to command different things (pizza, bevarages) in a school cafeteria (open at lunch time) using uniquely the arrows of the keyboard and make the total to pay automatically. At the end of the week, recapitulate all the totals of the week (before year 2000 !) .
chocolat barre ] 100 10 chips ] 150 15 coca 2 dl ] 100 10 croque-monsieur ] 350 35 eau 2 dl ] 50 5 glace petite ] 100 10 glace grande ] 200 20 holywood ] 100 10 hot dog ] 250 25 lasagne ] 600 60 mandarine fruit ] 100 10 mars grand ] 100 10 mars petit ] 50 5 oeufs durs ] 50 5 orange fruit ] 100 50 orange jus 2 dl ] 100 10 pÂt ] 250 25 plat cuisin ] 600 60 pizza grande ] 600 60 pomme fruit ] 100 10 pomme jus 2 dl ] 100 10 ramequin ] 150 15 raviolis ] 600 60 salade ] 300 30 sandwich ] 250 25 sinalco 2 dl ] 100 10 smarties ] 100 10 tÂte au choco ] 50 5 th froid 2 dl ] 100 10 tomate jus 2 dl ] 200 20 yaourt ] 100 10 -------A--------] 0 0 -------B--------] 0 0 -------C--------] 0 0 -------D--------] 0 0 -------E--------] 0 0 -------F--------] 0 0 -------G--------] 0 0 -------H--------] 0 0 -------I--------] 0 0 *********** FIN DE LISTE *************** LIGNE 121 ********************