PROGRAM LSB;
function least_significant_byteof (num: integer): byte; BEGIN least_significant_byteof := num AND $FF; END; { least_significant_byteof }
BEGIN WriteLn(least_significant_byteof($1FF)); END.
Prof A Olowofoyeku (The African Chief) schrieb:
Hi all
Does anyone know how to return the lest significant byte of a given number? e.g. function least_significant_byteof (num: integer): byte;
An algorithm in Pascal or C would be fine.
Thanks,