clc
//Chapter2
//Ex_2.14
//Given
Xd=0.15
p_c=4*10^-8 //ohm*m
p_eff=p_c((1+0.5*Xd)/(1-Xd))
disp(p_eff,"Effective resistivity in ohm m is")
// change in the answer due to coding