In[]:=
layer1=a/@(xArray[w,5]+Array[b,5])
Out[]=
{a[b[1]+xw[1]],a[b[2]+xw[2]],a[b[3]+xw[3]],a[b[4]+xw[4]],a[b[5]+xw[5]]}
In[]:=
a/@Flatten[layer1.Array[wp,5]+Array[bp,5]]
Out[]=
{a[bp[1]+a[b[1]+xw[1]]wp[1]+a[b[2]+xw[2]]wp[2]+a[b[3]+xw[3]]wp[3]+a[b[4]+xw[4]]wp[4]+a[b[5]+xw[5]]wp[5]],a[bp[2]+a[b[1]+xw[1]]wp[1]+a[b[2]+xw[2]]wp[2]+a[b[3]+xw[3]]wp[3]+a[b[4]+xw[4]]wp[4]+a[b[5]+xw[5]]wp[5]],a[bp[3]+a[b[1]+xw[1]]wp[1]+a[b[2]+xw[2]]wp[2]+a[b[3]+xw[3]]wp[3]+a[b[4]+xw[4]]wp[4]+a[b[5]+xw[5]]wp[5]],a[bp[4]+a[b[1]+xw[1]]wp[1]+a[b[2]+xw[2]]wp[2]+a[b[3]+xw[3]]wp[3]+a[b[4]+xw[4]]wp[4]+a[b[5]+xw[5]]wp[5]],a[bp[5]+a[b[1]+xw[1]]wp[1]+a[b[2]+xw[2]]wp[2]+a[b[3]+xw[3]]wp[3]+a[b[4]+xw[4]]wp[4]+a[b[5]+xw[5]]wp[5]]}