umwandlung(Binärzahl,Dezimalzahl)
2003-03-28 14:18
Anonymer User
umwandlung(Binärzahl,Dezimalzahl).
umwandlung([],0).
umwandlung([T|Rest],X):-T=0, umwandlung(Rest,X2), X is X2*2.
umwandlung([T|Rest],X):-T=1, T2 = [0|Rest], umwandlung(T2,X2), X is
((X2*2)+1).
Hallo Leute,
kann mir vielleicht irgendjemand sagen was daran falsch ist?
Danke im voraus!
umwandlung([],0).
umwandlung([T|Rest],X):-T=0, umwandlung(Rest,X2), X is X2*2.
umwandlung([T|Rest],X):-T=1, T2 = [0|Rest], umwandlung(T2,X2), X is
((X2*2)+1).
Hallo Leute,
kann mir vielleicht irgendjemand sagen was daran falsch ist?
Danke im voraus!