diff options
Diffstat (limited to '2045/CH13/EX13.4/Ex13_4.sce')
| -rwxr-xr-x | 2045/CH13/EX13.4/Ex13_4.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/2045/CH13/EX13.4/Ex13_4.sce b/2045/CH13/EX13.4/Ex13_4.sce new file mode 100755 index 000000000..786bd3b67 --- /dev/null +++ b/2045/CH13/EX13.4/Ex13_4.sce @@ -0,0 +1,11 @@ +//pagenumber 580 example 4
+clear
+voltag=2000;//volt
+d=15;//centimetre
+d1=3;//centimetre
+r1=((d^2+d1^2)/(6))*10^-2;//centimetre to metre
+vox=sqrt(2*1.6*10^-19*(voltag)/(9.11*10^-31));
+b=vox/((1.6*10^-19*r1)/(9.11*10^-31));
+
+disp("transverse magnetic field = "+string((b))+"weber per metre square");
+
|