1:
2:
3:
4:
5:
6:
7:
8:
9:

Graph: 
  - array of TKnoten; //alle Knoten des Graphen

  TKnoten:
     - array of TKante  //alle Kanten, die von diesem Knoten wegführen

     TKante:
        - Nach: TKnoten //Ziel der Kante
       (- Von : TKnoten //Start ist der Knoten, zu dessen Array diese Kante gehört )					

1:
2:
3:
4:
5:
6:
7:

  TKnoten = class
    private k : TKante;
  end;

  TKante = class
    private n : TKnoten;
  end;					

1:
2:
3:
4:
5:
6:
7:
8:
9:

  TKante = class;

  TKnoten = class
    private k : TKante;
  end;

  TKante = class
    private n : TKnoten;
  end;