1 / 6

Firma Bananasplit

Firma Bananasplit. Wir bieten folgende Rabatte auf den Kauf unserer Edel-Bananen: Großhändler(15%) Einzelhändler(10%) Einzelkunde(5%). Sie fragen sich wie das geht?. Unser kompetenter Rechnungsexperte Chuck Norris erklärt Ihnen, wie einfach man eine Rechnung in unserer Firma erstellt.

brent
Download Presentation

Firma Bananasplit

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. Firma Bananasplit • Wir bieten folgende Rabatte auf den Kauf unserer Edel-Bananen: • Großhändler(15%) • Einzelhändler(10%) • Einzelkunde(5%)

  2. Sie fragen sich wie das geht? Unser kompetenter Rechnungsexperte Chuck Norris erklärt Ihnen, wie einfach man eine Rechnung in unserer Firma erstellt.

  3. Chuck Norris´ persönliche Analyse: • Der Kunde teilt uns seine Bestellmenge mit, sowie seinen Händlerstatus • Daraus ermittelt unser Experte ihren Rabatt sowie den Gesamtpreis • Danach folgt die Ausgabe der oben angegebenen Größen E: Händlerstatus(char),Rechnung(real) V:Rabatt,Endpreis(real) A:Endpreis,Rabatt

  4. Chuck Norris´ persönliches Struktogramm: E: Rechnung, Händlerstatus Falls Händlerstatus= else ‘K,k‘ ‘E,e‘ ‘G,g‘ rab:=geld*0.10; rab:=geld*0.15; writeln(‘falsche Eingabe‘); rab:=geld*0.05; Geld:=geld-rab; A: writeln(‘Sie bezahlen‘,geld:6:2,‘Euro‘); writeln(‘Sie sparen‘,rab:6:2;‘Euro‘);

  5. Chuck Norris´ persönlicher Quelltext: program rechnung; uses crt; var typ:char; geld,rab:real; begin clrscr; writeln('(G)rosshaendler?'); writeln('(E)inzelhaendler?'); writeln('(K)unde normal?'); readln(typ); writeln('rechnungshoehe:'); readln(geld); case typ of 'G','g':begin rab:=geld*0.15; geld:=geld-rab; end; 'E','e':begin rab:=geld*0.10; geld:=geld-rab; end; 'K','k':begin rab:=geld*0.05; geld:=geld-rab; end; else writeln('falsche Eingabe'); end; writeln('ihr rechnung betr„gt:',geld:6:2,'EURO'); writeln('sie haben ',rab:6:2, 'EURO gespart'); readln;end.

  6. Chuck Norris´ finaler Schritt: • Nun setzt der Experte Norris den Quelltext in ein Programm um und kann es so oft nutzen wie er möchte. Sollten Sie die Rechnung nicht bezahlen, freut sich Chuck Norris auf einen persönlichen Besuch bei Ihnen.

More Related