b2d10.m

来自「信息论与编码中」· M 代码 · 共 14 行

function y=b2d10 (x)       %子函数，十进制转换为二进制

ii=1;y=zeros(10,1);
while ii<10
    x=x*2;
    if x>=1 ;b=1;x=x-1;
    else  b=0;
    end
    y(ii)=b;
    ii=ii+1;
end