Trong Pascal, có đoạn chương trình sau

Trong Pascal, có đoạn chương trình sau:
  
Var S:array[1..10] of real;
  
Và
  
S2:=0;
 for i:=1 to 10 do
  if S[i] < 50 then s2:=s2+s[i];
  
Đoạn chương trình trên dùng để tính:
(0.5 Điểm)
A. Tổng các phần tử của S có giá trị lớn hơn 50
B. Tổng các phần tử của S có giá trị nhỏ hơn 50
C. Tích các phần tử của S có giá trị nhỏ hơn 50
Tùy chọn 4
D. Không tính gì cả