diff options
Diffstat (limited to '1784/CH39')
| -rwxr-xr-x | 1784/CH39/EX39.6/example_6.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1784/CH39/EX39.6/example_6.sce b/1784/CH39/EX39.6/example_6.sce new file mode 100755 index 000000000..217c6a6b3 --- /dev/null +++ b/1784/CH39/EX39.6/example_6.sce @@ -0,0 +1,12 @@ +//Example 6 +//chapter 39 +//clc() +r=1//in m +p=10^3// +m=4*%pi*10^-7//weber/amp-m +c=3*10^8 +x=2*%pi +E_m=(1/r)*(sqrt((p*m*c)/x)) +disp(E_m,"The value of E in volts/meter=") +B=E_m/c +disp(B,"B in weber/meter^2") |