trong đề bài ko có i:=i+1;
nhưng nếu ko có phần đó thì lệnh lặp while-do ko có điểm dừng (hoặc ko có điều kiện kết thúc do x ban đầu =0 và i<10)
chương trình có dạng
var i,s:longint;
begin
while i<=10 do
begin
i:=i+1;
if i mod 2 <>0 then s:=s+i;
end;
write(s);
readln;
end.
Sau khi thực hiện chương trình trên, cho kết quả s = 36
⇒ chọn đáp án D. đáp án khác