---

Hallo zusammen,

ist es möglich, dass bei einer for-Schleife der Wert der Zählvariablen nicht um 1 sondern nach einer bestimmten Bedingung geändert wird?

Ich habe verschiede Termine in einer Tabelle untereinander stehen und möchte gerne wissen, wie oft die gleiche Zahl vorkommt.

0
0
0
1
2
2
3

Meine Schleife sah bisher so aus:

for i:=1 to Tabelle.ydim loop

if Tabelle[1,i]=Tabelle[1,i+1] then ...
end;

if Tabelle[1,i]=Tabelle[1,i+1] and Tabelle[1,i+1]=Tabelle[1,i+2] then..
end;

usw. So ist es mir möglich, dass der Wert immer überschrieben wird und ich letztendlich weiß wie häufig die null vorkommt.
Beim nächsten Durchlauf würde die Schleife ja bei i=2 ansetzen und so wieder die Null überprüfen. Mein Wunsch ist aber, dass an der Stelle i=4 die Prüfung der if-Bedingungen durchgeführt wird (und dann für i=5 und dann für i=7, also immer je nachdem wie häufig die vorherige Zahl vorkam).
Ist das irgendwie möglich?

Beste Grüße

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Sind die Zahlen aufsteigend sortiert (wie in Ihrem Beispiel)?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ja!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Es sollte am besten mit einer Tabelle funktionieren (z.B. Name Häufigkeiten, erste Spalte Ihr Wert, zweite Spalte Häufigkeit).
In dieser Tabelle können Sie dann recht einfach die Häufigkeiten ermitteln:

Code:

---

häufigkeiten.löschen;

for i:=1 to Tabelle.ydim loop

  if i=1 then
  häufigkeiten[1,1]:=Tabelle[1,i];
  häufigkeiten[2,1]:=1;
  else
    if Tabelle[1,i]=Tabelle[1,i-1]then
    -- gleicher Wert, dazuzählen
    häufigkeiten[2,häufigkeiten.yDim]:=häufigkeiten[2,häufigkeiten.yDim]+1;

    else
      --neue Zeile für neuen Wert
      häufigkeiten[1,häufigkeiten.yDim+1]:=Tabelle[1,i];
      häufigkeiten[2,häufigkeiten.yDim]:=1;

    end;

  end;

next;

---

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP