summaryrefslogtreecommitdiff
path: root/1553/CH7/EX7.7/7Ex7.sce
diff options
context:
space:
mode:
Diffstat (limited to '1553/CH7/EX7.7/7Ex7.sce')
-rw-r--r--1553/CH7/EX7.7/7Ex7.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/1553/CH7/EX7.7/7Ex7.sce b/1553/CH7/EX7.7/7Ex7.sce
new file mode 100644
index 000000000..bc4e37756
--- /dev/null
+++ b/1553/CH7/EX7.7/7Ex7.sce
@@ -0,0 +1,10 @@
+//chapter 7 Ex7
+
+clc;
+close;
+
+//Let one number be x, tbhus other is 15-x; according to given conditions forming the polynomial p=x^2+(15-x)^2; solving it we get
+mycoeff=[56 -15 1];
+p=poly(mycoeff,"x","coeff");
+r=roots(p);
+printf("The two numbers are: %d and %d",r(1),r(2));