summaryrefslogtreecommitdiff
path: root/3876/CH3
diff options
context:
space:
mode:
Diffstat (limited to '3876/CH3')
-rw-r--r--3876/CH3/EX3.1/Ex3_1.sce16
-rw-r--r--3876/CH3/EX3.2/Ex3_2.sce16
-rw-r--r--3876/CH3/EX3.3/Ex3_3.sce18
-rw-r--r--3876/CH3/EX3.4/Ex3_4.sce17
4 files changed, 67 insertions, 0 deletions
diff --git a/3876/CH3/EX3.1/Ex3_1.sce b/3876/CH3/EX3.1/Ex3_1.sce
new file mode 100644
index 000000000..9bee8e7ac
--- /dev/null
+++ b/3876/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,16 @@
+//Chapter 3 Liquids
+
+clc;
+clear;
+
+//Initialisation of Variables
+p= 388.6 //mm
+p1=26.5 //mm
+T= 60 //C
+R= 1.99 //cal mole^-1 A^-1
+
+//Calculations
+Lv= log10(p/p1)*2.303*R*273*(273+T)/(T)
+
+//Results
+mprintf("Heat of Vapourisation of Benzene = %d cal per mole",Lv+2);
diff --git a/3876/CH3/EX3.2/Ex3_2.sce b/3876/CH3/EX3.2/Ex3_2.sce
new file mode 100644
index 000000000..f1c13142c
--- /dev/null
+++ b/3876/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,16 @@
+//Chapter 3 Liquids
+
+clc;
+clear;
+
+//Initialisation of Variables
+d= 0.789 //gram per cc
+r= 0.010 //cm
+h= 5.76 //cm
+g= 980.7 // cm /sec^2
+
+//Calculations
+R= d*h*r*g/2
+
+//Results
+mprintf("Surface Tension = %.1f dynes per cm",R);
diff --git a/3876/CH3/EX3.3/Ex3_3.sce b/3876/CH3/EX3.3/Ex3_3.sce
new file mode 100644
index 000000000..cef2edbee
--- /dev/null
+++ b/3876/CH3/EX3.3/Ex3_3.sce
@@ -0,0 +1,18 @@
+//Chapter 3 Liquids
+
+clc;
+clear;
+
+//Initialisation of Variables
+W= 0.220 //gms
+g= 980.7 //cm per sec62
+f= 0.98
+l= 4 //cm
+
+//Calculations
+T= W*g/(2*l)
+Tc= T*f
+
+//Results
+mprintf("Apparent Surface Tension = %.1f dynes per cm",T);
+mprintf("\nExact Surface Tension = %.1f dynes per cm",Tc);
diff --git a/3876/CH3/EX3.4/Ex3_4.sce b/3876/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..fc11da87a
--- /dev/null
+++ b/3876/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,17 @@
+//Chapter 3 Liquids
+
+clc;
+clear;
+
+//Initialisation of Variables
+n2= 10.05*10**-3 //poise
+d1= 0.879 //gms cm^-3
+t= 88 //sec
+d2= 1 //gms cm^-3
+t1= 120 //sec
+
+//Calculations
+n1= d1*t/(d2*t1)
+
+//Results
+mprintf("Relative Viscosity= %.3f",n1);