Zahlensysteme

[Anima]

Nabnd,
ich arbeite momentan an einem kleinen TI-BASIC Programm, dass folgende verschiedene Zahlen in andere Systeme konvertiert:
Binär -> Dezimal
Dezimal -> Binär
Hexadezimal -> Dezimal
Dezimal -> Hexadezimal

Derzeit beschäftige ich mich damit, eine Binärzahl in eine Dezimalzahl zu konvertieren. Wie das rechnerisch geht weiß ich schon, aber wie ich das ganze dann in TI-BASIC umsetze, nicht. Deswegen bräuchte ich etwas Hilfe von einem Matheexperten, kann mir jemand einen kleinen Denkanstoß/Codeschnipsel/o.ä. geben, mit dem ich das schaffe? Wäre sehr nett.

[p2]

Ich hab sowas auch schonmal probiert.
hatte aber auch keine Ahnung, wie das gehen sollte.

Must einfach für jede Zahl ein eigenes if XXXXXXX :xxxxx->XXXXX

[Anima]

Must einfach für jede Zahl ein eigenes if XXXXXXX :xxxxx->XXXXX

Nur dumm, dass es so viele Zahlen gibt.
Geht bestimmt auch irgendwie einfacher.

[p2]

Kannst noch machen

{2,4,8,16,32,64,...}->l1
For(X,1,dim(l1),1)
if A=x-1
then
" "->Str1
For(B,1,A-1,1)
"1"+Teil(Str1,1,Länge(Str1))->Str1
End
End


Das müsste es dir dann als Str1 speichern (bei 1,3,7,15,31,...)

[Anima]

Hm, will irgendwie nicht klappen. Wenn ich das so in meinen Taschenrechner eintippe, passiert mit dem String nichts.
Und schreib den Code das nächste Mal bitte nicht mit deutschen Befehlen, ich hab meinen auf Englisch eingestellt.

[Munchor]

http://www.omnimaga.org/index.php?topic=5396.msg89615#msg89615 und http://www.omnimaga.org/index.php?topic=5396.msg89630#msg89630 kann nützlich sein.

[p2]

Sorry, anima!
Ich hab meinen  TI zwar auch auf Englisch, denk aber in deutsch.