Einzelnen Beitrag anzeigen

Benutzerbild von implementation
implementation

Registriert seit: 5. Mai 2008
940 Beiträge
 
FreePascal / Lazarus
 
#3

AW: Dezimalzahlen ins Binärsystem

  Alt 4. Nov 2010, 14:58
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

Geändert von implementation ( 4. Nov 2010 um 15:00 Uhr)
  Mit Zitat antworten Zitat