summaryrefslogtreecommitdiff
path: root/692/CH6/EX6.17/P6_17.sce
blob: bae17ef6e9789e8e7d3223ede57ee4d60e71988b (plain)
1
2
3
4
5
6
7
8
9
10
//EXAMPLE 6.16
//Coefficients of Rational form

clc;
clear;
z=%z;
num = 18*z^3;
den = 18*z^3 + 3*z^2 - 4*z - 1;
disp(coeff(num)/18,'the Numerator polynomial coefficients are:');
disp(coeff(den)/18,'the denominator polynomial coefficients are:');