Zahlensysteme formel

[implementation]

Öhm, eine Formel?
Sowas gibt's in der Programmierung nicht.

Algorhythmen dazu gibt's, ja.
Hier eine universelle Routine

Die müsstest du dann nur noch als hex := ToString(ToUnsigned(bin,2),16); aufrufen.