Dezimalzahlen ins Binärsystem

[implementation]

Mod und Div brauchste doch gar nisch?
Hier mal ein kleiner Pseudocode, wie das Umwandeln für den Anfang aussehen könnte:

Code:

LIES Editfeld AUS => VARIABLE "s"
WANDLE "s" MITTELS "IntToStr" IN "Integer" UM => VARIABLE "i"

WENN "i" >= 128 DANN
  SETZE höchstes bit (msb)
  ZIEHE 128 VON "i" AB

WENN "i" >= 64 DANN
  SETZE zweithöchstes bit
  ZIEHE 64 VON "i" AB

...

//Edit: War mal wieder jemand schneller ... Aber na gut, sind ja auch 2 unterscheidliche Ansätze

[NewDelphiBenutzer]

aber wir müssen das mit mod und dif machen das ist die letzte vorbereitungsmöglichkeit für die am montag anstehende Klausur, weil wir das mit dem, was ihr vorgeschlagen habt, noch nicht hatten =(

[implementation]

Zitat von NewDelphiBenutzer:

aber wir müssen das mit mod und dif machen

Hmm, okay. Dann benutzen wir statt des Abziehens einfach Mod und statt des Testens auf GrößerGleich eben Div

Code:

WENN i div 128 = 1 DANN
  SETZE BOX
  i = i mod 128

[Neutral General]

Ich gebe dir mal einen Ansatz/Beispiel:

10 : 2 = 5 Rest 0
5 : 2 = 2 Rest 1
2 : 2 = 1 Rest 0
1 : 2 = 0 Rest 1

Die Reste von oben nach unten ergeben dann die Binärzahl: 1010

5 div 2 = 2
5 mod 2 = 1

Damit lässt sich denke ich mal was anfangen

[NewDelphiBenutzer]

hmm also soll ich schreiben

Delphi-Quellcode:

if dezimalzahl div128=1
          then checkbox128.check;

und muss das nicht irgendwas mit boolean rein oder so? das sagt mein delphi und mein lehrer hat es auch erwähnt, aber ich wusste nich, was das bedeutet. ich bin echt ziemlich blöd

[DeddyH]

2 Möglichkeiten:

Delphi-Quellcode:

if dezimalzahl div 128 = 1 then
  checkbox128.checked := true
else
  checkbox128.checked := false;

Oder eleganter:
checkbox128.checked := dezimalzahl div 128 = 1;

[implementation]

Zitat von DeddyH:

2 Möglichkeiten:

Delphi-Quellcode:

if dezimalzahl div 128 = 1 then
  checkbox128.checked := true
else
  checkbox128.checked := false;

Oder eleganter:
checkbox128.checked := dezimalzahl div 128 = 1;

Man bedenke, dass nachfolgende Mod nicht zu vergessen, sonst kommt bei 64, 32, 16, 8, 4, 2 und 1 nur Crap raus.

[DeddyH]

Es ging doch in meinem Post nur darum, wie man eine Checkbox checkt

[NewDelphiBenutzer]

das müssten dann ja 10.000.000 sein, wenn man das Muster verfolgt.

[implementation]

Zitat von NewDelphiBenutzer:

das müssten dann ja 10.000.000 sein, wenn man das Muster verfolgt.

Was jetzt? dec 128 => bin? Dann rechne lieber nochmal nach