Datum: ___________________

Abgabetermin: ___________________ am Ende / am Anfang der Übungsstunde

Lernziele: Prozeduren mit Parameter verwenden

Aufgabe:

Herzlichen Glückwunsch! Sie sind angestellt worden von der berühmte Werbeagentur TFH GmbH. Ihre erste Aufgabe, was noch in der Woche vor Weihnachten fertig werden muß, ist es eine Grußkarte für einen großen Berliner Kaufhaus zu programmieren. Es sollen Weihnachtsbäume gedruckt werden, z.B.

   *
  * *
 *   *
*******
   |
                                    *
                                   * *
                                  *   *
                                 *     *
                                *       *
                               ***********
                                    |
                                    |
             *
            * *
           *   *
          *     *
         *       *
        *         *
       *           *
      ***************
             |
             |
             |

Ihr Programm muß dazu in der Lage sein, unterschiedliche Baumhöhen und unterschiedliche Einrückungen zu berücksichtigen. Die Höhe des Baums ohne den Stamm soll Höhe heißen, der Einrücktiefe Einrück. Der Hauptprogramm für obige Karte ist:

begin
   BaumZeichnen (Höhe => 4, Einrück => 0);
   BaumZeichnen (Höhe => 6, Einrück => 30);
   BaumZeichnen (Höhe => 8, Einrück => 15);
end Grußkarte;

Keine globale Variablen dürfen verwendet werden! ENTWERFEN Sie Ihre Lösung bevor Sie anfangen zu programmieren!

Extrapunkt: Verwenden Sie ANSI.SYS Kommandos um die Bäume grün zu zeichnen, die Spitzen gelb und blinkend!