1 files changed, 14 insertions, 0 deletions
diff --git a/1553/CH34/EX34.4/34Ex4.sce b/1553/CH34/EX34.4/34Ex4.sce
new file mode 100644
index 000000000..136ecb1f4
--- /dev/null
+++ b/1553/CH34/EX34.4/34Ex4.sce
@@ -0,0 +1,14 @@
+//Chapter 34 Ex 4
+
+clc;
+close;
+clear;
+theta1=(60*%pi)/180; theta2=(30*%pi)/180;   //converted into radian
+d1=36;     //given
+x=poly(0,'x');
+for x=1:25
+    if round((d1+x)*tan(theta2))==round(x*tan(theta1)) then
+        break
+    end
+end
+mprintf("The breadth of the river is %d meters",x);