9 files changed, 132 insertions, 0 deletions
diff --git a/1571/CH12/EX12.1/Chapter12_Example1.sce b/1571/CH12/EX12.1/Chapter12_Example1.sce
new file mode 100755
index 000000000..e77f7f3ba
--- /dev/null
+++ b/1571/CH12/EX12.1/Chapter12_Example1.sce
@@ -0,0 +1,16 @@
+clc
+clear
+
+//INPUT
+t1=300;//temperature of the surroundings in K
+t2=900;//temperature of the hot body p in K
+t3=500;//temperature of the hot body q in K
+a=5.67*10^-8;//stefan boltzmann constant in W/m^2.K^4
+
+//CALCULATIONS
+q1=a*(t2^4-t1^4);//heat lost from hot body p in w/m^2
+q2=a*(t3^4-t1^4);//heat lost from hot body q in w/m^2
+q=q1/q2;//ratio of heat lost from two substances
+
+//OUTPUT
+mprintf('ratio of heat lost from two substances is %3.2f',q)
diff --git a/1571/CH12/EX12.2/Chapter12_Example2.sce b/1571/CH12/EX12.2/Chapter12_Example2.sce
new file mode 100755
index 000000000..70f733cb1
--- /dev/null
+++ b/1571/CH12/EX12.2/Chapter12_Example2.sce
@@ -0,0 +1,16 @@
+clc
+clear
+
+//INPUT
+t1=573;//temperature of the hot side in K
+t2=273;//temperature of the coll side in K
+m=82;//mass of the black body in gm
+cp=0.1;//specific heat of the black body kj/kg.K
+dt=0.35;//ice melting at a rate of temperature in deg.C/sec
+a=8;//area of black body in sq.cm
+
+//CALCULATIONS
+s=m*cp*dt/(a*(t1^4-t2^4));//boltzmann constant in cal/sq.cm/sec/deg^4
+
+//OUTPUT
+mprintf('boltzmann constant is %3.13f cal/sq.cm/sec/deg^4',s)
diff --git a/1571/CH12/EX12.3/Chapter12_Example3.sce b/1571/CH12/EX12.3/Chapter12_Example3.sce
new file mode 100755
index 000000000..724a9320e
--- /dev/null
+++ b/1571/CH12/EX12.3/Chapter12_Example3.sce
@@ -0,0 +1,14 @@
+clc
+clear
+
+//INPUT
+r1=60;//distance of first black body in cm
+r2=30;//distance of second black body in cm
+t1=873;//temperature of first black body in K
+t2=573;//temperature of the second black body in K
+
+//CALCULATIONS
+i=(t2^4/t1^4)*(r1^2/r2^2);//ratio of intensity of radition
+
+//OUTPUT
+mprintf('ratio of intensity of radition is %3.2f',i)
diff --git a/1571/CH12/EX12.4/Chapter12_Example4.sce b/1571/CH12/EX12.4/Chapter12_Example4.sce
new file mode 100755
index 000000000..2946dabc6
--- /dev/null
+++ b/1571/CH12/EX12.4/Chapter12_Example4.sce
@@ -0,0 +1,14 @@
+clc
+clear
+
+//INPUT
+t1=1373;//temperature of the sphere in K
+t2=283;//temperature of the black body in K
+r=4.17*10^5;//rate of heat radiate in ergs/sq.cm/sec
+a=4*3.14*(6^2);//surface area of the sphere in sq.cm
+
+//CALCULATIONS
+tr=r*a*(t1^4/t2^4)*(2.39005736*10^(-8));//total heat radiated in cal/sec
+
+//OUTPUT
+mprintf('total heat radiated is %3.2f cal/sec',tr)
diff --git a/1571/CH12/EX12.5/Chapter12_Example5.sce b/1571/CH12/EX12.5/Chapter12_Example5.sce
new file mode 100755
index 000000000..68920a906
--- /dev/null
+++ b/1571/CH12/EX12.5/Chapter12_Example5.sce
@@ -0,0 +1,13 @@
+clc
+clear
+
+//INPUT
+h=2*3.14*100;//heat received by the lens per min in  cal
+m=25;//mass of the ice in gm
+l=80;//latent heat of ice in cal/gm
+
+//CALCULATIONS
+t=m*l/h;//time for which the sun rays falls in min
+
+//OUTPUT
+mprintf('time for which the sun rays falls is %3.2f min',t)
diff --git a/1571/CH12/EX12.6/Chapter12_Example6.sce b/1571/CH12/EX12.6/Chapter12_Example6.sce
new file mode 100755
index 000000000..a465c65e5
--- /dev/null
+++ b/1571/CH12/EX12.6/Chapter12_Example6.sce
@@ -0,0 +1,16 @@
+clc
+clear
+
+//INPUT
+d=0.35;//diameter of the mirror in m
+t=5;//time in min
+T=16;//temperature of water found to be in deg.C
+m=60;//mass of water in gm
+mc=30;//mass of calorimeter in gm
+cp=0.1;//specific heat of copper in cal/gm/deg.C
+
+//CALCULATIONS
+q=(m+cp*mc)*T*4/(5*3.14*d^2);//amount of heat received by earth in cal
+
+//OUTPUT
+mprintf('amount of heat received by earth is %3.2f cal',q)
diff --git a/1571/CH12/EX12.7/Chapter12_Example7.sce b/1571/CH12/EX12.7/Chapter12_Example7.sce
new file mode 100755
index 000000000..6fc1e3045
--- /dev/null
+++ b/1571/CH12/EX12.7/Chapter12_Example7.sce
@@ -0,0 +1,16 @@
+clc
+clear
+
+//INPUT
+r1=5;//radius of first sphere in cm
+r2=10;//radius of second sphere in cm
+t1=700;//temperature of the first sphere in K
+t2=500;//temperature of the second sphere in K
+t=300;//temperature of the enclousure in K
+
+//CALCULATIONS1
+dc=(r2/r1)*(t1^4-t^4)/(t2^4-t^4);//ratio of c1/c2
+r=r1^3*dc/r2^3;//rate of heat loss
+
+//OUTPUT
+mprintf('rate of loss of heat is %3.2f',r)
diff --git a/1571/CH12/EX12.8/Chapter12_Example8.sce b/1571/CH12/EX12.8/Chapter12_Example8.sce
new file mode 100755
index 000000000..371f52950
--- /dev/null
+++ b/1571/CH12/EX12.8/Chapter12_Example8.sce
@@ -0,0 +1,15 @@
+clc
+clear
+
+//INPUT
+t1=600;//temperature of the black body in K
+t0=300;//temperature of the surroundings in K
+d=6;//deflections in galvanometer
+d1=400;//deflection in divisions
+
+//CALCULATIONS
+dt=(d1/d)*(t1^4-t0^4);//change of temperature
+t2=(dt+t0^4)^(1/4);//end temperature in K
+
+//OUTPUT
+mprintf('end temperature of the temperature is %3.2f K',t2)
diff --git a/1571/CH12/EX12.9/Chapter12_Example9.sce b/1571/CH12/EX12.9/Chapter12_Example9.sce
new file mode 100755
index 000000000..15f945c7d
--- /dev/null
+++ b/1571/CH12/EX12.9/Chapter12_Example9.sce
@@ -0,0 +1,12 @@
+clc
+clear
+
+//INPUT
+n=17000;//luminosity of star compared to sun
+t=6000;//temperature of the sun in K
+
+//CALCULATIONS
+t1=(n*t^4)^(1/4);//temperature of the star in K
+
+//OUTPUT
+mprintf('the temperature of the star is %3.2f K',t1)