Das deutsche QBasic- und FreeBASIC-Forum

[stef]

Da ist ein kleiner Fehler in Deinem Beispiel. 66 ist nicht 1100010 sondern 1000010.

[anherrmann]

Hallo,

ja ist mir schon klar. Aber das hat doch jetzt mitder Eingabe deines Programmes zu tun. Oder? Ich frag nur.
Oder wie soll ich das versthehen?

[stef]

Also wenn Du unbedingt die Eingabe mit Kommas machen willst, dann brauchst Du in Deinem Programm nur eine Änderung vornehmen und den ersten Absatz des calc-Blockes so machen:

calc: i$ = i$ + ","
n% = 0
a%(0) = 0
FOR i% = 1 TO LEN(i$)
m$ = MID$(i$, i%, 1)
IF m$ = "," THEN
n% = n% + 1
a%(n%) = 0
ELSE
a%(n%) = a%(n%) * 2 + VAL(m$)
END IF: NEXT

Wenn Du jetzt 1000010,1001000,0,0 eingibst, dann kommt 50 raus.

[SpionAtom]

ich weiß, ich bin ein Loser, aber was bedeutet

IEEE


_________________
Inzwischen gehöre ich auch zu den BlitzBasicern. Also verzeiht mir, wenn mir mal ein LOCATE 100, 100 oder dergleichen rausrutscht.

[MisterD]

Format für Bits.. also so in der richtung vorzeichenbit-zahlenbits für integer zB oder sowas. beschreibt im prinzip die anordnung, man könnte das vorzeichenbit auch wo anders hin, dann gibts da noch zeugs mit matrize, exponent etc. hatte da glaub ich bei dreael oder A.Meile ma was gelesen, weiß aber auch ned mehr genau.
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[anherrmann]

Hallo,

vielen Dak für deine Antwort.

Ich würde dich gerne noch was zu deinem Programm morgen fragen.

Ok?

MFG

Andreas

[MisterD]

könnst du n @sowieso vor deine Texte setzen wenn du nicht mit deinem Vor-Poster redest? Von mir is hier nämlich kein Programm und jetzt weiß wahrscheinlich kaum einer, welches Programm bzw. wen du mit 'dich' meinst..
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra