diff options
Diffstat (limited to '3535/CH7/EX7.7')
-rw-r--r-- | 3535/CH7/EX7.7/Ex7_7.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3535/CH7/EX7.7/Ex7_7.sce b/3535/CH7/EX7.7/Ex7_7.sce new file mode 100644 index 000000000..9f8003496 --- /dev/null +++ b/3535/CH7/EX7.7/Ex7_7.sce @@ -0,0 +1,12 @@ +//Chapter 7, Example 7.7, Page 209 +clc +clear +// Range in water +x = poly([-2.5839, 1.3767, 0.20954],'x','c') +r = log10(2) +pow = horner(x,r) +Rp = 10**pow +RT = 3*Rp +printf("Rp = %f cm\n",Rp) +printf("RT = %f cm\n",RT) +//Answers may vary due to round off error |