![]() |
Re: Division nur mit FOR Schlaufe
|
Re: Division nur mit FOR Schlaufe
Zitat:
![]() Da gibt es doch gar keine FOR Schleife, oder versteh ich das falsch (Nur kurz überflogen)? |
Re: Division nur mit FOR Schlaufe
Zitat:
Grüße Klaus |
Re: Division nur mit FOR Schlaufe
Also mit while geht es ja nicht, dann währe es ja ein while programm! Aber ich galube ich habe die Lösung:
r:=x mod y ========== r:=0; LOOP x DO //maximal x durchläufe, da 1<=y<=x a:=0; LOOP x-r-y DO a:=1 END // if x-r > y then ... LOOP a DO r:=r+y END // ... r:=r+y END LOOP 1 DO r:=x-r END Glaube so klappt es |
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:01 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz