summaryrefslogtreecommitdiff
path: root/1553/CH7/EX7.14
diff options
context:
space:
mode:
Diffstat (limited to '1553/CH7/EX7.14')
-rw-r--r--1553/CH7/EX7.14/7Ex14.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/1553/CH7/EX7.14/7Ex14.sce b/1553/CH7/EX7.14/7Ex14.sce
new file mode 100644
index 000000000..cfe316738
--- /dev/null
+++ b/1553/CH7/EX7.14/7Ex14.sce
@@ -0,0 +1,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));