Sửa lỗi các câu lệnh sau cho đúng cú pháp : a) for i:=100 to 1 do writeln ('A'); b) for i:=0.5 to 11 do writeln ('A'); c) for i: 1 to 10 do writeln ('A'); d) X:=10; while X:=X+5 do X < 20; e) X:=5; while X < 10 do X : X + 5 ; d) X:=3; while X < 5 do X:=X+2

a) for i:=100 to 1 do writeln ('A');

Sửa lại 

for i:=100 downto 1 do writeln ('A');

b) for i:=0.5 to 11 do writeln ('A');

 Sửa lại : For i:=0 to 11 do writeln('A');

c) for i: 1 to 10 do writeln ('A');

Sửa lịa ::for i: =1 to 10 do writeln ('A');

d) X:=10; while X:=X+5 do X < 20;

Sửa lại 

X:=10; While X<20 do X:=X+5;

e) X:=5; while X < 10 do X : X + 5 ;

X:=5; While X<10 do X:=X+5;

d) X:=3; while X < 5 do X:=X+2

Sửa lại X:=3; while X < 5 do X:=X+2;

a) for i:=100 downto 1 do writeln ('A');

b) for i:=1 to 11 do writeln ('A');

c) for i:=1 to 10 do writeln ('A');

d) X:=10;

While X < 20 do X:=X+5;

e) X:=5;

While X < 10 do X :=X + 5 ;

f) X:=3;

While X < 5 do X:=X+2;