1 files changed, 36 insertions, 0 deletions
diff --git a/3782/CH7/EX7.9/Ex7_9.sce b/3782/CH7/EX7.9/Ex7_9.sce
new file mode 100644
index 000000000..2d3e23570
--- /dev/null
+++ b/3782/CH7/EX7.9/Ex7_9.sce
@@ -0,0 +1,36 @@
+
+
+
+//
+
+//
+
+printf("\n case 1')
+
+ir=3.415
+fr=4.415
+n=0//anchor point outside
+c=0
+sc=16   //1cm^2=16m^2
+h=10000
+ag=0.16*h
+
+am=ag/sc
+printf("\n A= %0.3f square centimeters",am)
+
+m=am/(fr-ir)
+
+printf("\n M= %0.3f ",m)
+
+printf("\n case 2')
+
+fr_ir=2.25
+c=21.22
+n=1
+
+a1=m*(fr_ir-10+c)
+printf("\n required area is %0.3f square centimeters ",a1)
+
+area=m*c
+
+printf("\n area of zero circle is %0.3f square centimeters",area)