path: root/1322/CH15/EX15.5/115ex2.sce

clear;
clc;
close;
x=poly(0,'x');
p1=x^4-27*x;
p2=x^2-9;
p=p1/p2;
q1=x^2+3*x+9;
q2=x+3;
q=q1/q2;
p/q