Von einer Array nur eine Variable durchlassen?

[Hallo_Thomas]

Ich wollte in eine Array folgende Bedingung einbauen.
Wenn 2 oder mehr Ergebnisse über 0<... liegen, sollten alle bis auf ein Feld auf Null gesetzt werden.Dieses Feld sollte aber beim nächsten Procedurdurchlauf wieder erkannt werden, und erst wenn Dieses Feld auf null zurückfällt kann ein neues Feld auf einen Wert über null Steigen.

Delphi-Quellcode:

Feld              : array[0..1500] of Integer;

[CLRS530]

Naja das ist doch nicht wirklich schwer, ich gebe jetzt nur mal ein paar Tips, weil ich denke, das du das selbst hinbekommen solltest und das ja immer besser ist ;)

Du läufst einfach einmal das ganze Array durch und fragst ob das jeweilige feld > 0 ist, wnen dme so ist, erhöhst du eine variable um 1.
Wenn die auf 2 steht, kannst du die schleife durch abbruchbedingung auch schon verlassen.

Jetzt kannst du das Array noch einmal durchlaufen und alles auf 0 setzen, bzw deinen einen eben nicht -_-
Naja und jetzt kannst du ja nachgucken ob dieses feld nicht mehr 0 ist.

Ganz Ehrlich, verstehe ich aber aus deiner sehr sehr allgemeinen Ausdrucksweise nicht, was du eigendlich willst.