3 files changed, 33 insertions, 0 deletions
diff --git a/380/CH4/EX4.14/4_14.txt b/380/CH4/EX4.14/4_14.txt
new file mode 100755
index 000000000..fbddcd729
--- /dev/null
+++ b/380/CH4/EX4.14/4_14.txt
@@ -0,0 +1,11 @@
+//Caption:Find the line current,line voltage and power 
+//Exa:4.14
+clc;
+clear;
+close;
+I_L=4*80/5;
+disp(I_L,'Line current (in Amperes)=');
+V_L=110*100/1;
+disp(V_L,'Line voltage (in Volts)=');
+P=(100/1)*(80/5)*352;
+disp(P,'Power on the transmission line (in Watts)=');
+\ No newline at end of file
diff --git a/380/CH4/EX4.14/4_14_R.txt b/380/CH4/EX4.14/4_14_R.txt
new file mode 100755
index 000000000..db3804ea0
--- /dev/null
+++ b/380/CH4/EX4.14/4_14_R.txt
@@ -0,0 +1,11 @@
+ Line current (in Amperes)=   
+ 
+    64.  
+ 
+ Line voltage (in Volts)=   
+ 
+    11000.  
+ 
+ Power on the transmission line (in Watts)=   
+ 
+    563200.
+\ No newline at end of file
diff --git a/380/CH4/EX4.14/Ex4_14.sce b/380/CH4/EX4.14/Ex4_14.sce
new file mode 100755
index 000000000..fbddcd729
--- /dev/null
+++ b/380/CH4/EX4.14/Ex4_14.sce
@@ -0,0 +1,11 @@
+//Caption:Find the line current,line voltage and power 
+//Exa:4.14
+clc;
+clear;
+close;
+I_L=4*80/5;
+disp(I_L,'Line current (in Amperes)=');
+V_L=110*100/1;
+disp(V_L,'Line voltage (in Volts)=');
+P=(100/1)*(80/5)*352;
+disp(P,'Power on the transmission line (in Watts)=');
+\ No newline at end of file