For schleifen Variable Definition

Caesar44 · Beiträge: 44

Guten Abend, nachdem gerade ebend mein anderes Problem großartig gelöst wurde habe ich folgendes Problem

In einer For-Schleife die wie folgt lautet

markieren

Delphi-Quelltext

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

For i := 40 to 45 do
begin
....
....
..
end;

dachte ich heißt i wird als 40 definiert und startet mit diesem Wert die Schleife
Im nächsten Schleifendurchgang müsste dann i doch 41 sein oder???
Bei mir wird i aus unerfindlichen Gründen nähmlich im zweiten durchlauf 1, obwohl ich es nicht nochmal definiert habe.

Grüße

Marc. · Verfasst: Di 02.06.09 20:14

Sollte auch so sein.

Zeig doch mal, was in der For-Schleife passiert. Wie hast du denn die Werte von i überprüft?

Xentar · Verfasst: Di 02.06.09 20:15

Hm ne, 1 kann eigentlich nicht vorkommen.
Was passiert denn in der Schleife? Kann es sein, dass du i da veränderst (sollte eigentlich ne Compiler Warnung erzeugen..)

_________________
PROGRAMMER: A device for converting coffee into software.

Narses · Verfasst: Di 02.06.09 20:21

Moin!

Xentar hat folgendes geschrieben :

Hm ne, 1 kann eigentlich nicht vorkommen.

Doch, der Compiler "optimiert" die Laufvariable, wenn in der Schleife nicht darauf zugegriffen wird. :idea:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.

Caesar44 · Beiträge: 44

Hier passierts:

markieren

Delphi-Quelltext

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

      For p := 1 to 10 do
      begin
        If i-p*8 < 0 then
        break;
        Feld[i-8*p] :=1;
      end;
      Feld[i]:=2;  // Wichtig

Sobald Feld[i]:= 2 dran kommt wird i =1
Ist das diese "optimierung"?
Und ja es kommt eine Warnung: For-Schleifenvariable muss einfache Lokalvariable sein.
Muss ich i also lokal definieren?

Martok · Verfasst: Di 02.06.09 20:33

Caesar44 hat folgendes geschrieben:

Und ja es kommt eine Warnung: For-Schleifenvariable muss einfache Lokalvariable sein.
Muss ich i also lokal definieren?

Ja, steht da ja

Theoretisch müsste da auch noch eine 2. Warnung kommen, denn nach der Schleife ist i undefiniert. Genau das müsste er dir eigentlich auch noch sagen?

_________________
"The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."

Marc. · Verfasst: Di 02.06.09 20:34

Martok hat folgendes geschrieben :

Theoretisch müsste da auch noch eine 2. Warnung kommen, denn nach der Schleife ist i undefiniert. Genau das müsste er dir eigentlich auch noch sagen?

Warum denn in diesem Beispiel nach der For-Schleife und nicht schon vorher? :gruebel:

Achso, du vermutest, dass die Schleifen in jeweils seperaten Prozeduren ausgeführt werden?

Xentar · Verfasst: Di 02.06.09 20:42

Narses hat folgendes geschrieben :

Doch, der Compiler "optimiert" die Laufvariable, wenn in der Schleife nicht darauf zugegriffen wird. :idea:

Ach man..

Wenn man eine Schleife schon genau von 40 bis 45 laufen lässt, geh ich mal davon aus, dass das schon nen Sinn hat -> Man diese Variable benutzt

_________________
PROGRAMMER: A device for converting coffee into software.

Martok · Verfasst: Di 02.06.09 20:45

Ich hab jetzt einfach mal unmittelbar auf den Code geantwortet, da der erste da irgendwie keinen Zusammenhang mit hat

ach, das ist ja ne andere Variable? Wo kommt denn die jetzt her?
Okay, ich erkläre offiziell dass ich nicht weiß, in welcher Reihenfolge der Code jetzt aufgerufen wird

Marc. hat folgendes geschrieben :

Warum denn in diesem Beispiel nach der For-Schleife und nicht schon vorher? :gruebel:

Vorher auch, klar.

Mit undefiniert meinte ich, dass man sich nicht darauf verlassen kann, dass die schleife Variable auch wirklich in der Richtung durchläuft. Der Compiler wird immer versuchen, auf 0 zu zählen, dazu werden ggf. noch interne Variablen benutzt. Oder auch nicht, wie Narses schon gesagt hat.

Wird unter anderem hier beschrieben, wo genau, müsste ich auch erst suchen

_________________
"The phoenix's price isn't inevitable. It's not part of some deep balance built into the universe. It's just the parts of the game where you haven't figured out yet how to cheat."

Caesar44 · Beiträge: 44

Hallo ihr seid klasse, Problem hat sich in Wohlgefallen aufgelöst, also kommt das nächste:

markieren

Delphi-Quelltext

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

For p := 1 to 10 do  // i=28
        begin
          If (i+p*7 > 64) and (i+p*7<>1) and (i+p*7<>9) and (i+p*7<>17) and (i+p*7<>25) and (i+p*7<>33) and (i+p*7<>41) and (i+p*7<>49) and (i+p*7<>57) then
          break;
          Feld[i+p*7]:=1;
        end;

Ich habe unter anderem definiert das die Schleife enden soll,wenn i+p*7 = 49 ist.
Das müsste doch eigentlich bei p=3 eintreten oder?
28 plus 21 = 49.
Aber das Programm scheint das zu ignorieren. Villeicht mag es mich nicht mehr :-D

Gruß Caesar

Marc. · Verfasst: Di 02.06.09 21:08

markieren

Delphi-Quelltext

1:	If (i+p7 > 64) and (i+p7<>1) and (i+p7<>9) and (i+p7<>17) and (i+p7<>25) and (i+p7<>33) and (i+p7<>41) and (i+p7<>49) and (i+p*7<>57) then

Caesar44 hat folgendes geschrieben :

Ich habe unter anderem definiert das die Schleife enden soll,wenn i+p*7 = 49 ist.

Das hast du nicht. Und selbst wenn du auf = 49 prüfst, ist zwar eine Abbruch-Bedingung von vielen erfüllt, aber nun mal nicht ALLE! Was hast du mir diesem merkwürdigen Konstrukt eigentlich vor? :gruebel:

koegi · Beiträge: 18 Win 7 64 bit Delphi 2009 Professional

Caesar44 hat folgendes geschrieben :

Hallo ihr seid klasse, Problem hat sich in Wohlgefallen aufgelöst, also kommt das nächste:

markieren

Delphi-Quelltext

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

For p := 1 to 10 do  // i=28
        begin
          If (i+p*7 > 64) and (i+p*7<>1) and (i+p*7<>9) and (i+p*7<>17) and (i+p*7<>25) and (i+p*7<>33) and (i+p*7<>41) and (i+p*7<>49) and (i+p*7<>57) then
          break;
          Feld[i+p*7]:=1;
        end;

Ich habe unter anderem definiert das die Schleife enden soll,wenn i+p*7 = 49 ist.
Das müsste doch eigentlich bei p=3 eintreten oder?
28 plus 21 = 49.
Aber das Programm scheint das zu ignorieren. Villeicht mag es mich nicht mehr :-D

Gruß Caesar

Hallo, Caesar!

Oben steht if (i+p*7 > 64) and ...
Kann es sein, dass Du dich bei der ersten Bedingung vertan hast? (if (i+p*7 <> 64) ...
Wenn ein Wert größer 64 ist, dann ist eine Prüfung auf Werte, die kleiner als 64 sind, sinnlos.

Den sinn des obigen Codes begreife ich leider auch nicht ganz...

Viele Grüße

Thomas

Caesar44 · Beiträge: 44

Tut mir leid, der Code ist tatsächlich nicht ganz verständlich, wenn man das Programm nicht kennt.
es ist das acht Damen Problem. dabei müssen um die Dame bestimmte der 64 Felder besetzt werden. Die reihe also jedes +-feld8, die Spalte und noch die schrägen Felder. dabei rechne ich +7 felder in dem Fall des Quelltextes um die Felder nach schräg oben als besetzt zu markieren. Allerding soll die Schleife stoppen, wenn ein feld am obersten Rand bestzt wurde, weil die Schleife Sonst in der nächsten Spalte wieder von unten anfängt, was ja nicht sinn der sache ist.
Ich hoffe ich konnte es einigermaßen verständlich machen. Ich könnte statt "and" "or" nehmen oder?

So jetzt hab ich es richtig gemacht:

markieren

Delphi-Quelltext

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

        For p := 1 to 10 do
        begin
          If (i+p*7 > 64) or (i+p*7=1) or (i+p*7=9) or (i+p*7=17) or (i+p*7=25) or (i+p*7=33) or (i+p*7=41) or (i+p*7=49) or (i+p*7=57) then
          begin
            Feld[i+p*7]:=1;
            break;
          end;

Jetzt werden alle Felder schräg oberhalb der Dame bis an die Kante besetzt
Grüße

koegi · Beiträge: 18 Win 7 64 bit Delphi 2009 Professional

Caesar44 hat folgendes geschrieben :

Tut mir leid, der Code ist tatsächlich nicht ganz verständlich, wenn man das Programm nicht kennt.
es ist das acht Damen Problem. dabei müssen um die Dame bestimmte der 64 Felder besetzt werden. Die reihe also jedes +-feld8, die Spalte und noch die schrägen Felder. dabei rechne ich +7 felder in dem Fall des Quelltextes um die Felder nach schräg oben als besetzt zu markieren. Allerding soll die Schleife stoppen, wenn ein feld am obersten Rand bestzt wurde, weil die Schleife Sonst in der nächsten Spalte wieder von unten anfängt, was ja nicht sinn der sache ist.
Ich hoffe ich konnte es einigermaßen verständlich machen. Ich könnte statt "and" "or" nehmen oder?

So jetzt hab ich es richtig gemacht:

markieren

Delphi-Quelltext

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

        For p := 1 to 10 do
        begin
          If (i+p*7 > 64) or (i+p*7=1) or (i+p*7=9) or (i+p*7=17) or (i+p*7=25) or (i+p*7=33) or (i+p*7=41) or (i+p*7=49) or (i+p*7=57) then
          begin
            Feld[i+p*7]:=1;
            break;
          end;

Jetzt werden alle Felder schräg oberhalb der Dame bis an die Kante besetzt
Grüße

Ei, sieh mal einer guck!

Plötzlich präsentierst Du uns hier eine or-Abfrage statt einer and-Abfrage!
So macht das ganze schon mehr Sinn...

Viele Grüße

Thomas

jaenicke · Verfasst: Di 02.06.09 22:57

Xentar hat folgendes geschrieben :

Narses hat folgendes geschrieben :

Doch, der Compiler "optimiert" die Laufvariable, wenn in der Schleife nicht darauf zugegriffen wird. :idea:

Ach man..

Wenn man eine Schleife schon genau von 40 bis 45 laufen lässt, geh ich mal davon aus, dass das schon nen Sinn hat -> Man diese Variable benutzt

Das heißt aber nicht, dass die Schleife intern so läuft. Intern kann die trotzdem von 4 auf 0 laufen z.B., denn der Compiler sorgt dafür, dass trotzdem die richtigen Werte verwendet werden.

Beim Debuggen werden aber die Werte 4 bis 0 z.B. angezeigt, weil die IDE von Delphi keine Ahnung hat, dass das so optimiert wurde. Und deshalb sieht das beim Debuggen falsch aus. Aber auch nur da. Benutzt werden die richtigen Werte. Die stehen aber woanders als es die IDE erwartet.

Fazit: Zum Debuggen insbesondere bei solchen Start- und Endwerten für Schleifen generell die Optimierung beim Kompilieren deaktivieren...

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme