lsum(k,k,makelist((l:makelist(random(6)+1,i,1,5),(lmax(l)+lmin(l))*100),l,1,1000))/1000.0;