Đoạn chương trình sau giải bài toán nào?

Đoạn chương trình đã cho giải bài toán tổng các số chia hết cho 3 và 5 trong phạm vi từ 1 đến M.

For I:=1 to M do { I chạy trong phạm vi từ 1 đến M}
If (I mod 3 = 0) and (I mod 5 = 0) then {kiểm tra I chia hết cho 3 và cho 5 không}
T := T + I; {Cộng dồn vào tổng}