diff options
Diffstat (limited to '1067/CH3/EX3.1/3_1.sce')
-rwxr-xr-x | 1067/CH3/EX3.1/3_1.sce | 15 |
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)
|