Einzelnen Beitrag anzeigen

Nuclear-Ping
(Gast)

n/a Beiträge
 
#10

Re: Doppelte Werte in einem Array zählen...

  Alt 30. Okt 2004, 17:17
Delphi-Quellcode:
  Result := 0;
  for I := 0 to High(ErstesArray) do
    if Count[ErstesArray[I]] > 1 then
      Inc(Result);
Yep, das hab ich gesehen, mich allerdings gefragt, was du damit erreichen willst. Denn kommt da nicht einfach eine "große" Zahl raus?

Result ist ja vor der Schleife 0 und wird in der Schleife bei jedem Wert, der > 1 ist erhöht. Das heisst, dass Result dann nach der Schleife die Anzahl der Werte enthält, die > 1 sind, oder lieg ich da falsch?

Angenommen wir haben in Count durch die Zählung folgendes Ergebnis:
Code:
Index: 0 1 2 3 4 5 6 n
Zähler: 0 0 2 0 2 3 0 n
Result:    1   2 3 ...
Result wäre also in dem Beispiel nach dem Durchlauf 3.

Zitat:
Es gibt aber auch andere Möglichkeiten dieses Problem sehr effizient (zeitlich, nicht speichermäßig) hinzubekommen. [...]
Ja, ich glaub, ich weiss, was du meinst. Richtig klick gemacht hats zwar nicht, jedoch gedämmert.

Grüße,
Mario
  Mit Zitat antworten Zitat