Zur Themenübersicht     

Wertetabelle für das ggT - Programm

Aufruf des ggT - Programmes

In dem Beispiel für eine Wertetabelle simulieren wir den Aufruf des ggT - Programmes in der Form des folgenden Beispieles:

Aufruf

Bei diesem Aufruf ergibt sich nun folgende Wertetabelle.

Wertetabelle

Wertetabelle
Hier ist der dazugehörige Programmtext:


1


2
3
4
5
6
7
8
9
10
11
Programmcode:

procedure
Tform1.berechne_ggt(alok, blok :integer;
                    var :ggtlok :integer);
var rest :integer;
  begin
    while rest <> 0 do
     begin
      rest := alok mod blok;
      alok := blok;
      blok := rest;
     end;
    ggtlok := alok;
   end;

Nach dem Durchführen des Programmes "berechne_ggt" erscheint dann folgende Ausgabe:

Ausgabe