summaryrefslogtreecommitdiff
path: root/1301/CH14/EX14.11/ex14_11.sce
blob: e76f887448aed90bab822d7e3114c754da35eec3 (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)/s;       //calculating magnitude of field
disp(B,"Magnitude of field in Tesla = ");    //displaying result