Division nur mit FOR Schlaufe

[Weazy]

Ich habe folgendes Problem: x mod y mit einem LOOP programm berechnen. Dazu habe ich mir überlegt das x mod y = x - (x div y) * y ist, wobei x div y nur ein ganzzahliges ergebniss liefert. So weit so gut, doch wie kann ich x div y nur mit for Schlaufen berechnen? Mit while ist das kein Problem, aber mit for?!?

[mkinzler]

Wie würde die Where-Bedingung aussehen?

[nuclearping]

for-Schleifen haben eine bestimmte Anzahl an Durchläufen (for i := 0 to 9 -> 10 Durchläufe). Repeat und While-Schleifen können unendlich laufen, bis eine Abbruchbedingung erreicht ist.

[Weazy]

und genau das ist ja das problem!

[mkinzler]

Du könntest in einem ersten Schritt sie Grenzen berechnen. Ich sehe aber den Sinn gerade nicht.

[himitsu]

jupp, du müßtest dann vorher berechnen wieviele Schleifen nötig sind.

notfalls könnte man zwar auch ein For-Schleifchen vorzeitig abbrechen (mit Break), aber da könnte man dich auch gleich eine passendere While/Repeat-Schleife nutzen?

[Weazy]

und in einem Loop programm kann man die schleife ja auch nicht abbrechen...

[Weazy]

vielleicht kann man ja davon ausgehen dass man die genaue anzahl loops nicht kennt, aber es ein maximum gibt oder so?!?

[nuclearping]

Was ist ein "LOOP-Programm"?

Delphi-Quellcode:

repeat
  if AbbruchBedingung then
    break;
until FALSE;

[brechi]

LOOP = Schleife: also warum keine while schleife
Ansonsten:

Delphi-Quellcode:

divx := 0;
modx := 0;
for i := 1 to x do
begin
  inc(modx);
  if modx = y then
  begin
    inc(dix);
    modx := 0; 
  end;
end;

vill so?