a, to → downto

b, vì i có kiểu dữ liệu là số nguyên(integer hoặc longint,int64,..) nên thay 1.5 vs 10.5 thành 1 số nguyên khác

c, = → :=

d,x=x+1→ x:=x+1;

   y=y+2 → y:=y+2; end→ end;

e, a:=2a+1→ a:=2*a+1

f, x:=khong → x:=0;

1. Dạng 1:

a. For i:=100 to 1 do writeln(A);

sửa lại

For i:=1 to 100 do writeln(A);

b. For i:=1,5 to 10,5 do Writeln(a);

sửa lại For i:=1 to 10 do Writeln(a);

c. For i=1 to 10 do writeln(a);

sửa lại For i:=1 to 10 do writeln(a);

d. For i=1 to 10 do begin x:=x+1; y:=y+2; end

sửa lại For i:=1 to 10 do begin x:=x+1; y:=y+2; end;

e. A:=3 while a$\neq$2 do a:=2a+1;

sửa lại A:=3 while a<>2 do a:=2*a+1;

f. X:=khong while x<=2 do wrtieln(x+2);

sửa lại X:=0 while x<=2 do writeln(x+2);