summaryrefslogtreecommitdiff
path: root/1553/CH4/EX4.28/4Ex28.sce
blob: 95a8905484e65a82cb9a536bb8188e23271f1397 (plain)
1
2
3
4
5
6
7
8
9
10
//chapter 4 Ex 28

clc;
clear;
close;
sumsquares=117; product=54;
Sum=sqrt(sumsquares+2*product); //from the formula (a+b)^2=a^2+b^2+2*a*b
subtract=sqrt(sumsquares-2*product);
value=Sum/subtract;
mprintf("The value of (a+b)/(a-b)=%.0f",value);