Renée Bäcker -- Perl-Programmierer, Perl-Magazin, Vorträge, etc.

Programmieraufgaben für Perl-Anfänger:

Ich habe hier ein paar Aufgaben aus dem Java-Tutorial von Gailer übernommen und Perl-Lösungen dafür erarbeitet. Meine Lösungswege stellen nur einen möglichen Lösungsweg dar. Natürlich kann man die Aufgaben auch auf anderem Wege lösen, aber hier gilt die "Perl-Weisheit" TIMTOWTDI - There is more than one way to do it.
Bitte gewöhnen Sie sich schon bei solch "leichten" Aufgaben an

use strict;
use warnings;

zu verwenden. Warum? Die Antwort gibt's im Wiki der Perl-Community.de

Aufgabe 1 - Durchschnittliche Niederschlagsmenge:
Schreiben Sie ein Programm, das die durchschnittliche Niederschlagsmenge für die drei Monate April, Mai und Juni berechnet. Deklarieren und initialisieren Sie eine Variable für jeden Monat. Berechnen Sie den Durchschnitt und geben Sie das Ergebnis in folgender Form aus:

Niederschlag im April:    12
Niederschlag im Mai  :    14
Niederschlag im Juni :    8
Durchschnitt:             11.333333333333

Lösung

Aufgabe 2 - Cent zu Dollar:
Schreiben Sie ein Programm, das eine Zahl in Cent einliest. Das Programm soll die Anzahl von Dollar und Cent wie folgt ausgeben:

D:\users\default>perl dollar.pl
Geben Sie die Cent ein:
324
Das ergibt 3 Dollar und 24 Cent.

Lösung

Aufgabe 3 - Discountpreise:
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 Discountpreis berechnet. Der Gesamtbetrag wird in Cent (als Ganzzahl) eingegeben.

Geben Sie den Gesamtbetrag ein:
2000
Discountpreis: 1800

Lösung

Aufgabe 4 - Überprüfung der Bestellung:
Bobs Schrauben Discount verlangt folgende Preise:

5 Cent pro Schraube
3 Cent pro Mutter
1 Cent pro Unterlegscheibe

Schreiben Sie ein Programm, das den Anwender nach der Anzahl der Schrauben, Muttern und Beilegscheiben fragt und dann den Gesamtbetrag berechnet und ausgibt. Zusätzlich überprüft das Programm die Bestellung. Es ist normalerweise ein Fehler, wenn mehr Schrauben als Muttern bestellt werden. In diesem Fall gibt das Programm die Meldung aus "Kontrollieren Sie Ihre Bestellung!". Andernfalls gibt das Programm aus "Die Bestellung ist okay." In jedem Fall wird der Gesamtbetrag ausgegeben.

Anzahl der Schrauben:
12
Anzahl der Muttern:
8
Anzahl der Unterlegscheiben:
24

Kontrollieren Sie Ihre Bestellung!

Gesamtbetrag: 108

Lösung

Aufgabe 5:
Schreiben Sie ein Programm, das den Anwender nach einem Start- und Endwert fragt und dann alle Zahlen (Integer) inklusive der eingegebenen ausgibt.

Startwert:
5
Endwert:
9

5
6
7
8
9

Lösung

Aufgabe 6:
Schreiben Sie ein Programm, das ein Wort einliest. Das Wort wird dann so oft ausgegeben, wie es Buchstaben hat:

Geben Sie ein Wort ein:
Hello

Hello
Hello
Hello
Hello
Hello

Lösung

Aufgabe 7:
Schreiben Sie ein Programm, das Quadrat- und Kubikzahlen (Integer) von 1 bis n addiert. Wobei n vom Anwender eingegeben wird.

Geben Sie n ein:
5
Die Quadratsumme ist: 55
Die Kubiksumme ist: 225

Lösung

Aufgabe 8:
Schreiben Sie ein Programm, das Sterne in Keilform ausgibt. Der Anwender gibt die Anfangszahl für die Sterne ein und das Programm gibt Zeilen von Sternen aus, wobei jede Zeile einen Stern weniger hat als die vorhergehende.

Anfangszahl der Sterne:
7

*******
******
*****
****
***
**
*

Lösung

Perl-Aufgaben