m =Table[p*5 * (1-((((p-4)/p)+d)/4)) - (10-1)*4, {p, 7, 15, 8}, {d, 0, 0.4, 0.1}]