1 files changed, 16 insertions, 0 deletions
diff --git a/2075/CH4/EX4.15/pe4_15.sce b/2075/CH4/EX4.15/pe4_15.sce
new file mode 100755
index 000000000..7e46fa1c9
--- /dev/null
+++ b/2075/CH4/EX4.15/pe4_15.sce
@@ -0,0 +1,16 @@
+//example 4.15
+clc; funcprot(0);
+// Initialization of Variable
+R=8//resistance
+Ts=35//temperature
+Ta=150//temperature
+Vm=42//voltage
+//calcuation
+Vp=Vm-5;
+Vr=Vp/2^.5;
+Pm=Vr^2/R;
+disp(Pm,"power delivered in watt:")
+P=45;
+Qs=(Ta-Ts)/P-1.2;
+disp(round(Qs*10)/10,"thermal resistance in degreeC/W")
+clear()