|
Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
Turbo Delphi für Win32
|
Re: Fehler beim Einsatz von Schleife
11. Apr 2007, 11:16
if (not ((i=x) and (j=y))) and (Feld[i,j]=1) then inc(k,1);
Das lösen wir jetzt noch schön auf, nach den De-Morgan'schen Regeln:
if (i<>x) or (j<>y) and (Feld[i,j]=1) then inc(k,1);
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
|