%exm0643_1.m
%（1）單位函數(shù)及性質(zhì)驗證
syms n
Delta=sym('charfcn[0](n)');					%定義單位函數(shù) 				<2>
D0=subs(Delta,n,0);							%計算 
D15=subs(Delta,n,15);						%計算 
disp('[D0,D15]')
disp([D0,D15])  


%（2）求序列 的Z變換
syms z;
fn=2*Delta+6*(1-(1/2)^n);
FZ=simple(ztrans(fn,n,z));
disp('FZ = ')
pretty(FZ)
FZ_n=iztrans(FZ,z,n)