a, Không hoạt động: vì phải viết từ nhỏ đến lớn (1 to 100)

b, Không Hoạt động: Vì Giá trị đầu và giá trị cuối phải là số nguyên (1,5 và 10,5 là số thập phân)

c. Không hoạt động: Vì trước i thiếu hai chấm (:)

d, Không hoạt động: Vì thừa chấm phẩy (;) trước Do

e, Không hoạt động: Vì x phải gán là Integer hoặc Logint (ở đây x bị gán là Real)

$\text{a) For i := 100 to 1 do writeln('A');}$

$\text{- Câu lệnh không hợp lệ}$

$\text{- Giá trị đầu <100> lớn hơn giá trị cuối <1>}$

$\text{- Sửa : For i := 1 to 100 do writeln('A');}$

$\text{b) For i := 1.5 to 10.5 do writeln('A');}$

$\text{- Câu lệnh không hợp lệ}$

$\text{- Sai kiểu dữ liệu biến i}$

$\text{- 1.5 và 10.5 là kiểu số thực}$

$\text{- Biến đếm trong câu lệnh lặp thường có kiểu nguyên}$

$\text{- Sửa : For i := 1 to 10 do writeln('A');}$

$\text{c) For i = 1 to 10 do writeln('A');}$

$\text{- Câu lệnh không hợp lệ}$

$\text{- Sai dấu gán i = 1}$

$\text{- Sửa : For i := 1 to 10 do writeln('A');}$

$\text{d) For i := 1 to 10 do; writeln('A');}$

$\text{- Câu lệnh hợp lệ}$

$\text{- Sai dấu chấm phẩy sau do}$

$\text{- Sửa : For i := 1 to 10 do writeln('A');}$

$\text{e) Var x : real; Begin For x := 1 to 10 do writeln('A'); end;}$

$\text{- Sai kiểu dữ liệu biến đếm x}$

$\text{- Biến x được khai báo kiểu thực}$

$\text{- Sửa : Var x : integer; Begin For x := 1 to 10 do writeln('A'); end;}$