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