Binär-Zahl ---> Dezimal-Zahl

Übersicht

BlitzBasic

Allgemein

	Fetze Betreff: Binär-Zahl ---> Dezimal-Zahl	Sa, Jan 08, 2005 23:22 Antworten mit Zitat
Hiho Stehe gerade vor dem Problem, eine Binärzahl, in einem String gespeichert, in eine Dezimal-Zahl umformen zu müssen und keine Ahnung zu haben, wie das eigentlich geht. Also, so in etwa sollte das aussehen: "01" -> 1 "10" -> 2 "100" --> 4 "11001" --> 25 Wie bekomme ich das möglichst einfach hin?

Fetze

Betreff: Binär-Zahl ---> Dezimal-Zahl

Sa, Jan 08, 2005 23:22
Antworten mit Zitat

Hiho

Stehe gerade vor dem Problem, eine Binärzahl, in einem String gespeichert, in eine Dezimal-Zahl umformen zu müssen und keine Ahnung zu haben, wie das eigentlich geht.

Also, so in etwa sollte das aussehen:

"01" -> 1
"10" -> 2
"100" --> 4
"11001" --> 25

Wie bekomme ich das möglichst einfach hin?

	noir	Sa, Jan 08, 2005 23:24 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] Zahl$=BIN$(123) FOR i=1 TO LEN(Zahl$) IF MID$(Zahl$,i,1)="1" THEN Wert=Wert+2^(LEN(Zahl$)-i) NEXT PRINT "Zahl: "+Wert steht in der OH

noir

Sa, Jan 08, 2005 23:24
Antworten mit Zitat

Code: [AUSKLAPPEN]

Zahl$=BIN$(123)
FOR i=1 TO LEN(Zahl$)
IF MID$(Zahl$,i,1)="1" THEN Wert=Wert+2^(LEN(Zahl$)-i)
NEXT
PRINT "Zahl: "+Wert

steht in der OH Wink

	Fetze	Sa, Jan 08, 2005 23:28 Antworten mit Zitat
Oh, danke ^^

Fetze

Sa, Jan 08, 2005 23:28
Antworten mit Zitat

Oh, danke ^^

	Sebe	Mo, Jan 10, 2005 0:32 Antworten mit Zitat
Ich hab da eine Userlibrary in PureBasic geschrieben, mit der man Binär, Oktal, Dezimal und Hexadezimale Zahlen in Binär, Oktal, Dezimal oder Hexadezimale Zahlen umwandeln kann. Das zip Packet enthält auch eine DLL, falls du sie mal ausprobieren willst: http://wow.noxys.de/numsys.zip

Sebe

Mo, Jan 10, 2005 0:32
Antworten mit Zitat

Ich hab da eine Userlibrary in PureBasic geschrieben, mit der man Binär, Oktal, Dezimal und Hexadezimale Zahlen in Binär, Oktal, Dezimal oder Hexadezimale Zahlen umwandeln kann. Das zip Packet enthält auch eine DLL, falls du sie mal ausprobieren willst: http://wow.noxys.de/numsys.zip