Delphi-Quellcode:
Writeln ('Rabatt :',Rabatt:15:2,' EUR') ;
Writeln ('Brutto :',brut:15:2,' EUR') ;
writeln;
writeln;
until artikelnr = 0;
writeln('Gesamtpreis :' + FloatToStr(gesamtpreis));
...oder was meinst du?
Edit:
Zitat von
shmia:
Wenn ein Programm aber interaktiv mit dem Benutzer kommunizieren soll (wie in deinem Fall), dann kommt eigentlich nur eine "normale"
VCL-Anwendung in Frage.
Weshalb muss es bei dir eine Konsolenanwendung sein ?
Kommt nur einen
VCL-Anwendung in Frage ist bissel übertrieben.
Geht beides und ist Geschmackssache.
Eine
VCL-Anwendung wäre natürlich auch für den Benutzer übersichtlicher.