clc; disp("Example 2.2"); v=120000; //volume in metre cube. t=1.5; //time in second. s=25000; //area in metre cube. a=(0.16*v)/(t*s); //using Sabine formula for calculating a disp(a,"Average Absorbing Power of Surface = "); //Displaying Result.