summaryrefslogtreecommitdiff
path: root/1553/CH7/EX7.14/7Ex14.sce
blob: cfe316738ad684899dd383d19586b4014f6d7fa1 (plain)
1
2
3
4
5
6
7
8
9
10
//chapter 7 Ex14

clc;
close;

//Let one number be x, tbhus other is 50-x; according to given conditions forming the polynomial p=x^2-50*x+600; solving it we get
mycoeff=[600 -50 1];
p=poly(mycoeff,"x","coeff");
r=roots(p);
printf("The two parts are: %d and %d",r(1),r(2));