p5_5.m

《数字信号处理实验指导书（MATLAB 版）》 著者： （美）米特拉著 作译者： 孙洪等译 ISBN号： 7-121-00700-2 出版日期： 2005-01 出版社：电子工业出

% Program P5_5
% Determines the binary equivalent of a
% decimal number in sign-magnitude form
d = input('Type in the decimal fraction = ');
b = input('Type in the desired wordlength = ');
d1 = abs(d);
beq = [zeros(1,b)];
for k = 1:b
	int = fix(2*d1);
	beq(k) = int;
	d1 = 2*d1 - int;
end
if sign(d) == -1; 
	bin = [1 beq];
else 
	bin = [0 beq];
end
disp('The binary equivalent is');
disp(bin)