summaryrefslogtreecommitdiff
path: root/1553/CH8/EX8.4/8Ex4.sce
blob: c4e6e968d002d07a5defabd2f1ae0a5e1c127c2e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//chapter 8 Ex 4

clc;
clear;
close;
//let son's age be x
//by the given condition:  equation is 3x+3+3=2(x+3)+10;
mycoeff=[-10 1];
p=poly(mycoeff,"x","coeff");
x=roots(p);
mprintf("Present age of father is %d years",3*x+3);