Có số lần lặp là:

`10-1+1=10(lần)`

Lần 1:i=1

1 mod 2 = 0 S->không thực hiện câu lệnh 

Lần 2:i=2

2 mod 2 = 0 Đ-> thực hiện câu lệnh s:=0+2=2

Lần 3:i=3

3 mod 2 = 0 S->không thực hiện câu lệnh

Lần 4:i=4

4 mod 2 = 0 Đ-> thực hiện câu lệnh s:=2+4=6

Lần 5:i=5

5 mod 2 = 0 S->không thực hiện câu lệnh 

Lần 6:i=6

6 mod 2 = 0 Đ-> thực hiện câu lệnh s:=6+6=12

Lần 7:i=7

7 mod 2 = 0 S->không thực hiện câu lệnh

Lần 8:i=8

8 mod 2 = 0 Đ-> thực hiện câu lệnh s:=12+8=20

Lần 9:i=9

9 mod 2 = 0 S -> không thực hiện câu lệnh

Lần 10:i=10

10 mod 2 = 0 Đ-> thực hiện câu lệnh s:=20+10=30

Vậy giá trị của S là 30

`->A`

S:= 0; `->` S ban đầu bằng 0

For i:=1 to 10 do `->` i chạy từ 1 đến 10

If i mod 2 =0 then S:= S + i; `->` duyệt i từng vòng lặp nếu i chia hết cho 2 thì cộng i vào S

Writeln (S); `->` in S ra màn hình

----------------

i có các giá trị lần lượt: 1 2 3 4 5 6 7 8 9 10

`->` các số chia hết cho 2: 2 4 6 8 10

`->` s=2+4+6+8+10=30

`->` S=30

`->` Chọn A