CHO ĐOẠN CHƯƠNG TRÌNH DƯỚI ĐÂY

4. Cho đoạn chương trình dưới đây:

Var i,s: integer;

BEGIN

i:=7; s:=4;

if (i>5) then s:=s + (6 - i)*2

else if (i<3) then s:=s + 5*i

else s:=s+2;

write('Tong s la:',s);

END.

Kết quả của chương trình trên là?