Logo

Programming-Idioms

History of Idiom 76 > diff from v9 to v10

Edit summary for version 10 by :
↷

Version 9

2015-08-21, 14:09:39

Version 10

2015-08-21, 14:49:02

Idiom #76 Binary digits from an integer

Create the string s of integer x written in base 2.

E.g. 13 -> "1101"

Idiom #76 Binary digits from an integer

Create the string s of integer x written in base 2.

E.g. 13 -> "1101"

Code 
var Iter,n:integer;
[...]
 S := '';
  for Iter := 0 to n do
    if (x shr Iter) and 1 = 0 then
      S := '0' + S
    else
      S := '1' + S;