summaryrefslogtreecommitdiff
path: root/3669/CH7/EX7.9/9.sce
blob: 81090b7bc4932e0ae5ea04cbd555f7afcfce7361 (plain)
1
2
3
4
5
6
7
8
9
10
11
12

//Variable declaration
N=10**28;     //number of atoms(per m**3)
chi1=2.8*10**-4;   //susceptibility
T1=350;    //temperature(K)
T2=300;    //temperature(K)

//Calculation
chi2=chi1*T1/T2;    //susceptibility

//Result
printf('susceptibility is %0.3f   *10**-4  \n',(chi2*10**4))