Cho trước var B: array[1..N] of real; Hãy cho biết đoạn lệnh sau dùng để làm gì?

tong:= 0;
for i:= 1 to N do
           if B[i] mod 2 = 0 then
                       tong:= tong + B[i]; 

• A. 
  Gán giá trị 0 cho biến tong
• B. 
  Tính tổng giá trị của các phần tử ở trong mảng
• C. 
  Tính  tổng  giá  trị của  các  phần  tử lớn  hơn  0 ở 
  trong mảng
• D. 
  Tính  tổng  giá  trị của  các  phần  tử nhỏ hơn  0 ở 
  trong mảng