blob: b81a5a5e92b9a4216b1caa4045178726db453101 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
clc
clear
//INPUT DATA
cp=0.1;//specific heat of copper in kj/kg-K
w=120;//weight of copper calorimeter in gm
a=1400;//weight of paraffin oil in gm
cp1=0.6;//specific of parafin oil in kj/kg-K
b=10^8;//force to rotate the paddle in dynes
T=16;//rise in temperature in deg.C
n=900;//no.of revolutions stirred
pi=3.14;//value of pi
//CALCULATIONS
c=2*pi*b;//work done by a rotating paddle per rotation in dyne cm per rotation
d=c*n;//total work done in dyne cm
hc=w*cp*16;//heat gained by calorimeter in calories
hp=a*cp1*16;//heat gaained by paraffin oil in calories
J=d/(hc+hp);//mecanical equivalent of heat in erg/cal
//OUTPUT
mprintf('mecanical equivalent of heat is %3.0f erg/cal',J)
|