Hallo allemaal, ik ben met natuurkunde nu bezig met binaire getallen enzo. Bijvoorbeeld het omrekenen van 'normaal' 10-cijfers naar binair. Ik wilde hier graag een programmaatje voor bouwen, maar ik ben nu net klaar, en er komt altijd 0 uit...
Kan iemand even kijken wat ik verkeerd doe? Het gaat namelijk (lijkt het) al bij de eerste stap mis, als ik een A invoer van meer dan 128 dan blijft de B altijd 0...?!
(misschien heb ik een foutje gemaakt bij het overtypen van mijn programmaatje, maar volgens mij niet...)
Of als iemand een beter/makkelijker alternatief heeft is dat natuurlijk ook goed!
Alvast Bedankt!
Job
Kan iemand even kijken wat ik verkeerd doe? Het gaat namelijk (lijkt het) al bij de eerste stap mis, als ik een A invoer van meer dan 128 dan blijft de B altijd 0...?!
Code:
ClrHome
Prompt A
If A>128 or A=128
Then
B=10000000
A-128=Z
Else
A=Z
B=0
End
If Z>64 or Z=64
Then
B=1000000
Z-64=Y
Else
Z=Y
B=0
End
If Y>32 or Y=32
Then
C=100000
Y-32=X
Else
Y=X
C=0
End
If X>16 or X=16
Then
D=10000
X-16=W
Else
X=W
D=0
End
If W>8 or W=8
Then
E=1000
W-8=V
Else
W=V
E=0
End
If V>4 or V=4
Then
F=100
V-4=U
Else
V=U
F=0
End
If U>2 or U=2
Then
G=10
U-2=T
Else
U=T
G=0
End
If T>1 or T=1
Then
H=1
Else
H=0
End
Disp "De binaire waarde van:"
Disp A
Disp "is"
Disp B+C+D+E+F+G+H(misschien heb ik een foutje gemaakt bij het overtypen van mijn programmaatje, maar volgens mij niet...)
Of als iemand een beter/makkelijker alternatief heeft is dat natuurlijk ook goed!
Alvast Bedankt!
Job
