Hallo Aphton!
1. Ich verstehe nicht, was das Problem ist, weil du es nicht genau formuliert hast.
Was genau ist der Fehler; was soll geschehen, was geschieht?
Das tut mir Leid. Ich war wohl zu sehr in der Materie. Ich habe oben den Output und das konkrete Problem ergänzt.
2. In der Funktion IntToBin() ist ein potenzieller Fehler:
Wenn Digits < als Anzahl der tatsächlichen Stellen (Index Fehler, da digits < 1 aber einer gewissen Anzahl von Schleifendurchläufen -> anders lösen)!
Die
IntToBin Funktion dient nur zum Testen. Aber danke für den Hinweis!