Entwickler-Ecke :: Thema anzeigen - For schleifen Variable Definition

Caesar44 - Di 02.06.09 20:10
Titel: For schleifen Variable Definition

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

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

Caesar44 - Di 02.06.09 20:30

Hier passierts:

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 - 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?

Marc. - 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 - 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 :D

Martok - 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 ;)

:shock: 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 [http://web.archive.org/web/20021021094615/www.optimalcode.com/general.htm] beschrieben, wo genau, müsste ich auch erst suchen ;)

Caesar44 - Di 02.06.09 20:59

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

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. - Di 02.06.09 21:08

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 - Di 02.06.09 21:20

Caesar44 hat folgendes geschrieben :

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

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;

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 - Di 02.06.09 21:31

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:

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 - Di 02.06.09 21:44

Caesar44 hat folgendes geschrieben :

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 - 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 :D

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...

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!