a) a := 5; while a < 10; then a = a + 1;

- Sai từ khoá then, dư chấm phẩy trước then

- Sai dấu gán a = a + 1

⇒ a := 5; while a < 10 do a := a + 1;

b) For i = 100 to 10 do Writeln('ABC');

- Sai dấu gán giá trị cho biến đếm

- Giá trị đầu (100) > Giá trị cuối (1)

⇒ For i := 10 to 100 do Writeln('ABC');

c) If x < 5; then x := x + 1; do x = x + 1;

- Sai cú pháp câu điều kiện

⇒ If x < 5 then x := x + 1; x := x + 1;

d) x := 10; n := 0; while x < 20 do n := n + 1; x := x + n;

- Chưa đưa 2 câu lệnh vào begin .. end;

⇒ x := 10; n := 0; while x < 20 do begin n := n + 1; x := x + n; end;