ReplaceAll[((Ceiling[w/m]-w/m) l) m, {l -> 8.3, w -> 6.7, m -> 1.0}]