Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Ungerade Zahlen odd (https://www.delphipraxis.net/114351-ungerade-zahlen-odd.html)

Muddy 23. Mai 2008 21:34

Re: Ungerade Zahlen odd
 
DU möchest, dass ich überprüfe ob die Zuifallszahl eine geradne oder ungerade ist. indem ich odd(zufall) in die Schleife einbaue.
Aber wie gebe ich die ungerade und die gerade Zahl in getrennten Memofelder aus?

BUG 23. Mai 2008 21:35

Re: Ungerade Zahlen odd
 
Zitat:

Zitat von 3_of_8
Gibt es nicht auch ... Odd?

Das ist natürlich besser ... wieder was gelernt :thumb:

MfG,
Bug

mkinzler 23. Mai 2008 21:37

Re: Ungerade Zahlen odd
 
Mein Einzeiler war wohl zu kurz :zwinker:
http://www.delphipraxis.net/internal...=891629#891629

Luckie 23. Mai 2008 21:37

Re: Ungerade Zahlen odd
 
[code}wenn odd(...) dann
Memo1
ansonsten
Memo2[/code]

Die Muhkuh 23. Mai 2008 21:37

Re: Ungerade Zahlen odd
 
Zitat:

Zitat von Muddy
DU möchest, dass ich überprüfe ob die Zuifallszahl eine geradne oder ungerade ist. indem ich odd(zufall) in die Schleife einbaue.
Aber wie gebe ich die ungerade und die gerade Zahl in getrennten Memofelder aus?

If-Abfrage mit Odd bzw. Even.

BUG 23. Mai 2008 22:04

Re: Ungerade Zahlen odd
 
Ein Tipp: mach erstmal eine Version des Programms (mit repeat-until)

Dann erzeugst du solange (repeat) eine neue Zufallszahl und schreibst diese in eines der Memos,
je nachdem, ob die Zahl gerade oder ungrade (odd(<die Zufallszahl>) = true) ist (siehe #14).
Das tust du, bis (until) die Anzahl der Zahlem im Memo für die graden Zahlen (MemoFuerGradeZahlen.lines.count) gleich der Benutzervorgabe ist.

Das umschreiben in eine zweite Version mit der while-Schleife sollte dich danach eigentlich nicht mehr lange aufhalten.

[OT]
Zitat:

Zitat von mkinzler
Mein Einzeiler war wohl zu kurz :zwinker:

Ich glaub, ich hab dich einfach ignoriert :tongue: :mrgreen:
[/OT]

MfG,
Bug


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:55 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz