Delphi

Sollten die Lösungen zum Verständnis nicht ausreichen, bitte mailen und die Telefonnummer einfügen. Ich maile oder rufe zurück.

Einführung

• Das Programm soll das Wort "Hallo"  anzeigen.   Hallo.exe   Hallo.zip
• Nach der Eingabe des Namens wird man persönlich begrüßt.   HalloName.exe   HalloName.zip
• Ein Button soll manipuliert werden. Andere Anzeige, andere Farbe, andere Größe, andere Position, ...   Button.exe   Button.zip
• Nach der Eingabe zweier Zahlen soll die Summe, die Differenz, das Produkt und der Quotient ausgegeben werden. Dabei soll es beim Quotienten zwei Anzeigen geben: Einmal als Dezimalzahl und einmal als Integerwert mit Rest.     Rechnen.exe   Rechnen.zip

 

Bedingungen

• Eine Zahl wird angezeigt. Nach der Eingabe einer Zahl wird auf Gleichheit, größer, kleiner überprüft.   Zahlen_vergleichen.exe   Zahlen_vergleichen.zip
• Eine Zahl soll auf Teilbarkeit durch eineandere Zahl überprüft werden.     
• Lösung der pq-Formel anzeigen.     
• Für ein rechtwinkliges Dreieck kann man 2 Seiten eingeben. Die 3. Seite soll dann berechnet werden.   Pythagoras.exe   Pythagoras.zip

 

Schleifen

• In einem Memofeld soll 12 mal Hallo ausgegeben werden.
• In einem Memofeld sollen die Zahlen von 1 bis x ausgegeben werden. X kann man eingeben.
• In einem Label soll die Summe aller Zahlen von 1 bis x ausgegeben werden.
• In einem Label soll das Produkt aller Zahlen von 1 bis x ausgegeben werden.
• Alle Teiler einer Zahl sollen ausgegeben werden.
• Eine Zahl soll überprüft werden ob sie eine Primzahl ist. (Eine Zahl ist eine Primzahl, wenn sie genau 2 Teiler hat.   Schleifen.exe   Schleifen.zip

 

Unterprogramme und Funktionen

Funktionen:

Schreibe folgende Funktionen und teste diese. Achte auf Sonderfälle. Eine Ausgabe innerhalb der Funktionen soll nicht erfolgen.

• Function primzahl(z : Integer) : Boolean;
• Function ggt(z1, z2 : Integer) : Integer;
• Function kgv(z1, z2 : Integer) : Integer;   Funtionen_prim_ggt_kgv.exe  Funtionen_prim_ggt_kgv.zip

 

Prozeduren

Schreibe folgende Prozeduren und teste diese. Achte auf Sonderfälle.Eine Ausgabe innerhalb der Funktionen soll nicht erfolgen.

• kuerzen(VAR nenner, zaehler : Integer);
• bruchplus(z1,n2,z2,n2 : Integer; VAR ergz,ergn : Integer);
• bruchminus(z1,n2,z2,n2 : Integer; VAR ergz,ergn : Integer);
• bruchmal(z1,n2,z2,n2 : Integer; VAR ergz,ergn : Integer);
• bruchdurch(z1,n2,z2,n2 : Integer; VAR ergz,ergn : Integer);
• Dies alles kann man auch in einem kleinen Bruchrechenprogramm einsetzen. Bruch.exe  Bruch.zip

 

Array

 

Rekursionen

• Berechne die Summe aller Zahlen von 1 bis n.
• Berechne das Produkt aller Zahlen von 1 bis n.
• Berechne die Elemente der Fibonacci-Folge: F(0) = 0, F(1)=1, F(n) = F(n-1) + F(n-2)    Rekursionen.exe Rekursionen.zip
• Berechne die Elemente des Pascalschen Dreiecks.                                            1
  Die inneren Elemente ergeben                                                                       1                    1
  sich aus aus der Summer der                                                               1                   2                   1
  darüber liegenden Elemente.                                                         1               3                    3                  1
  Diese Zahlen sind auch als Binomialkoffizient bekannt. Die linke 3 ist (3 über 1), die rechte 3 ist (3 über 2).
• Schreibe ein Programm, das einen Baum anzeigt.    Baum.exe   Baum.zip   
  
  1 Jahr                  5 Jahre                 10 Jahre                    10 Jahre mit Wind aus Osten    
  Dazu wird die Turtle-Komponente benutzt.   Turtle.zip
• Man kann sich auch zufällig Bäume generieren lassen.   Baum-Zufall.exe    Baum-Zufall.zip
• Schreibe ein Programm das folgendes Bild erzeugt    
• Schreibe ein Simulationsprogramm für das Problem "Türme von Hanoi"   Hanoi.exe   Hanoi.zip
• Schreibe ein Programm,das  den "Baum des Pythagoras" zeichnet   Baum_des_Pythagoras.zip Baum_des_Pythagoras.exe

 

Objektorientiert

• Schreibe ein Programm, das einen Billiardtisch mit 2 Kugeln simuliert  Billiard.zip  Billiard.exe