15 Variablen auf Ungleichheit prüfen

[Aphton]

Anstatt 15 Variablen zu verwenden, solltest du eine Variable verwenden~
Also anstatt:
Karte1, Karte2, ...., Karte15: Integer;

Das hier:
Karten: Array[1..15] of Integer;

Dann ermittelst du wie gewohnt die Karten eben per Zufallskarte
Also:
Karten[1] := Zufallskarte(...);
Karten[2] := Zufallskarte(...);
..

Dann kannste nämlich schön mit Schleifen durch und kucken, ob ne Karte doppelt oder mehrfach vorkommt!