> perl -le "print unpack q/b*/, pack F, 36.8"
0110011001100110011001100110011001100110011001100100001000000010

> perl -le "print unpack q/b*/, pack F, 36.6+.2"
1110011001100110011001100110011001100110011001100100001000000010