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