summaryrefslogtreecommitdiff
path: root/1067/CH3/EX3.1/3_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '1067/CH3/EX3.1/3_1.sce')
-rwxr-xr-x1067/CH3/EX3.1/3_1.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/1067/CH3/EX3.1/3_1.sce b/1067/CH3/EX3.1/3_1.sce
new file mode 100755
index 000000000..3a4478432
--- /dev/null
+++ b/1067/CH3/EX3.1/3_1.sce
@@ -0,0 +1,15 @@
+
+clear ;
+close ;
+clc ;
+R=10;
+L=0.1;
+f=50;
+w=2*%pi*f;
+k=sqrt((R^2)+((w*L)^2));
+angle=atan(w*L/R);
+E=400
+A=E*sin(angle)/k;
+i=A*exp((-R)*.02/L);
+i=round(i*100)/100;
+mprintf("the transient current =%fA",i)