Dữ liệu đã được sắp xếp theo kích thước nên không cần dùng dic
Code đã xét khả năng phân chia có số lượng dư và tính thêm 1 dòng
Chỉ xét 5 loại kích thước, nếu khác phải chỉnh lại mảng dữ liệu "arr"
Sub xyz()
Dim aSL(), arr(), res(), SL&, D&
Dim i&, j&, n&, c&, k&, sRow&, sRowRes&, sCol&...