Forum: Programmieren allgemein
by einbeliebigername,
3. Jun 2020
Sorry, wollte die Inline-Variablen auch mal ausprobieren. Dann aber vergessen die wieder rauszunehmen:
function ValueOfNthSetBitV2(const aValue: UInt64; const aValueBitWidth: Byte; const aN: UInt64): Byte;
var
vTmp: Array of UInt64;
vBitCount: Byte;
vI: Integer;
vBit: UInt64;
begin
Forum: Programmieren allgemein
by einbeliebigername,
3. Jun 2020
Hallo,
ich will auch mitspielen. Habe gleich zwei Varianten. Leider kennt Delphi die Operatoren ROL und ROR nicht. Ich glaube Pascal hatte die.
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}