#!ruby -p
sub($_[d=0,$&.to_i(2)]){e=$&.to_i 2
1while(a=b=c=1
c*=10until e<a=b+b=a
d+=c
0<e-=b)
print"1#{d}".reverse}while sub! /0*1.{#{~/1/}}/,"1"