summaryrefslogtreecommitdiff
path: root/1967/CH6/EX6.2
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1967/CH6/EX6.2
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1967/CH6/EX6.2')
-rwxr-xr-x1967/CH6/EX6.2/6_2.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/1967/CH6/EX6.2/6_2.sce b/1967/CH6/EX6.2/6_2.sce
new file mode 100755
index 000000000..300d1851e
--- /dev/null
+++ b/1967/CH6/EX6.2/6_2.sce
@@ -0,0 +1,18 @@
+clc
+//initialisation of variables
+clear
+Qe= 4.029
+Qe1= -37.02
+Qe2= 4.695*10^4
+T= 300 //K
+R= 1.98 //cal /mol K
+Qe3= 4.158
+Qe4= -200.8
+Qe5= 2.546*10^5
+T1= 500 //K
+//calculations
+Ce= R*((Qe2/Qe)-(Qe1/Qe)^2)/T^2
+Ce1= R*((Qe5/Qe3)-(Qe4/Qe3)^2)/T1^2
+//RESULTS
+printf ('electronic contribution = %.3f cal deg^-1.g.atom^-1',Ce)
+printf ('\n electronic contribution = %.3f cal deg^-1.g.atom^-1',Ce1)