summaryrefslogtreecommitdiff
path: root/1301/CH14/EX14.11/ex14_11.sce
blob: 364eac2b823f58486692a388cb65165dba83a93e (plain)
1
2
3
4
5
6
7
clc;
K=2*10^-7;        //constant in N/A square
N=100;           //number of turns
I=4;            //current in Ampere
r=5*10^-2;              //radius in m
B=(%pi*K*I*N)/r;       //calculating magnitude of field
disp(B,"Magnitude of field in Tesla = ");    //displaying result