Perl :: Aufgabe #19 :: Lösung #2

2 Lösungen Lösungen öffentlich
#19

Programmier-Basics: Rabattaktion

Anfänger - Perl von Freki - 27.12.2012 um 14:53 Uhr
Während einer Sonderaktion wird ein Rabatt von 10% auf alle
Einkäufe mit einem Gesamtbetrag von mehr als $10.00 gewährt.
Schreiben Sie ein Programm, das nach dem Gesamtbetrag fragt
und den Rabatt berechnet.
Der Gesamtbetrag wird in Cent (als Ganzzahl) eingegeben.

Konsolenausgabe:

Geben Sie den Gesamtbetrag ein:
2000
Discountpreis: 1800

#2
vote_ok
von Evolving (50 Punkte) - 31.07.2017 um 11:13 Uhr
Quellcode ausblenden Perl-Code
print "Geben Sie den Gesamtbetrag ein:\n";

chomp(my $gesamtbetrag = <STDIN>);

if ($gesamtbetrag > 10) {
    $gesamtbetrag = ($gesamtbetrag * 90) / 100;
    print "Discountpreis: $gesamtbetrag\n";
}

Kommentare:

Für diese Lösung gibt es noch keinen Kommentar

Bitte melden Sie sich an um eine Kommentar zu schreiben.
Kommentar schreiben
1988184

Du scheinst einen AdBlocker zu nutzen. Ich würde mich freuen, wenn du ihn auf dieser Seite deaktivierst und dich davon überzeugst, dass die Werbung hier nicht störend ist.