diff options
Diffstat (limited to '3665/CH11/EX11.9/Ex11_9.sce')
| -rw-r--r-- | 3665/CH11/EX11.9/Ex11_9.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3665/CH11/EX11.9/Ex11_9.sce b/3665/CH11/EX11.9/Ex11_9.sce new file mode 100644 index 000000000..7cd76e706 --- /dev/null +++ b/3665/CH11/EX11.9/Ex11_9.sce @@ -0,0 +1,14 @@ +clc//
+//
+//
+
+//Variable declaration
+mew=9.4*10^-24;
+H=2; //magnetic field(weber/m^2)
+k=1.38*10^-23; //boltzmann constant
+
+//Calculation
+T=2*mew*H/(log(2)*k); //temperature(K)
+
+//Result
+printf("\n temperature is %0.1f K",T)
|