1 files changed, 17 insertions, 0 deletions
diff --git a/2705/CH1/EX1.13/Ex1_13.sce b/2705/CH1/EX1.13/Ex1_13.sce
new file mode 100755
index 000000000..c91fa71a0
--- /dev/null
+++ b/2705/CH1/EX1.13/Ex1_13.sce
@@ -0,0 +1,17 @@
+clear;
+clc;
+disp('Example 1.13');
+
+
+
+//  Given values
+V = 230; // Voltage, [volts]
+W = 4; //  Power of heater, [kW]
+
+//  solution
+
+//  using equation P=VI
+I = W/V; //  current, [K amps]
+mprintf('\n The current taken by heater is  =  %f  amps \n',I*10^3);
+
+//  End