clc //initialisations m=5//kg m1=2.09*10^8 val=10^7//cal/kg p=0.12 //calculations w=p*m1/(60*60) H=w/746 //results printf(' average horse power= % 1f',H)