Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
14. Sep 2022
Dafür müsstest du hier aber auch noch eine passende Codepage basteln, welche '0' nach #0 und '1' nach #1 übersetzt. (UTF-8 wäre falsch)
https://stackoverflow.com/questions/8353043/how-can-i-create-a-codepage-under-windows
http://www.barrcentral.com/help/beps/Using_the_Code_Page_Editor.htm...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
13. Sep 2022
Jupp, natürlich ist es immer sinnvoll Zwischenergebnisse zwischenzuspeichern, wenn sie dann mehrmals zigtausende Male wiederverwendet werden.
ginge auch Binär, anstatt mathematisch
l_arr := Ord(ltemp <> '0');
l_arr := Ord(Odd(Ord(ltemp))) // Ord('1') ist Ungerade, also True, und Ord(True) ist 1 (wenn wirklich nur 1 und 0, weil 'b' oder '3' auch ungerade sind)
Und es gäbe auch fertige...