//example 4.2
//calculate precipitation at A using arithmatic mean method
clc;funcprot(0);
//given
pB=48;         //precipitation at B
pC=51;         //precpitation at C
pD=45;         //precipitation at D

pA=(pB+pC+pD)/3;
mprintf("precipitation at A=%i mm.",pA);