Schaff doch einfach eine Bedingung, die nicht zutrifft. Diese nimmst Du bei dann bei beiden als Schleifenbedingung. Z.B.
Delphi-Quellcode:
Zahl := 10;
while Zahl < 10 do
begin
...
end;
repeat
...
until Zahl >= 10;
[edit]
Was mit der einen geht, geht auch mit der anderen - ganz sicher.
Vorsicht! Man muss immer im Hinterkopf behalten, dass die Fußschleife mindestens einmal durchlaufen wird. Greift man also im Schleifenkörper auf etwas zu, was gar nicht da ist, macht es *Bumm*. In der Kopfschleife kann man das vorher prüfen (OK, bei einer Fußschleife auch, aber dann nicht erst in der Schleifenbedingung). [/edit]