clc;
Q=10;    //Heat in kilo calorie
m=1;     //mass in kg
delT=24;  //change in temperature in degree celcius
c=Q/(m*delT);   //calculating specific heat in kcal/(kg.degree celcius)
disp(c,"Spacific Heat in kcal/(kg.degree celcius) = ");  //displaying result.