a.for i:=1 to 10;do x:=x+1;

-> lệnh sai vì sau "to 10" không có dấu '' 

For<biến đếm > := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

Sửa lại:for i:=1 to 10 do x:=x+1;

b.for i:=10 to 1 do x:=x+1;

-> lệnh sai vì for i:=10 to 1 giá trị đầu phải nhỏ hơn giá trị cuối(10>1) nên  không lặp được.

Sửa for i:=1 to 10 do x:=x+1;

c.while i:=1 do t=10;

-> lệnh sai phép gán giá trị cho biến VD: x:=1

t=10(sai) thiếu dấu ':'  

Sửa lại:

while i:=1 do t:=10;

d.while a<=b;do write('b lon hon a');

-> lệnh sai vì Sau While a<=b không có ''(While <điều kiện> do <câu lệnh>) 

Sửa lại:

while a<=b do write('b lon hon a');

a) Sai vì có dấu ; giữa số 10 và chữ do

b) Sai vì thiếu chữ down

c) Đúng

a) Sai vì giá trị đầu lớn hơn giá trị cuối

b) Sai vì giá trị đầu lớn hơn giá trị cuối

b) Sai vì sau câu lệnh i:=1+1 thiếu dấu chấm phẩy

Câu lệnh đúng, không có lỗi.

a: Sai ở chỗ x=y

Sửa lại: x:=y;

b: Sai ở chỗ dấu chấm phẩy sau y>10

Sửa lại là bỏ dấu chấm phẩy

c: Sai ở chỗ có dấu chấm phẩy trước else

Sửa lại là bỏ dấu chấm phẩy

d: 

Sai ở chỗ dấu chấm phẩy sau x>=7

Sửa lại là bỏ dấu chấm phẩy

Câu 1:

-Đánh răng rửa mặt mỗi ngày

-Đi học

-Đi ngủ

Câu 2: 

a) Sai

Sửa lại: for i:=10 downto 1 do write('a');

b) Đúng

c) Đúng

Câu 3: 

Lặp n-1+1=n(lần)

Câu 4: 

S=15

Câu 5: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do

  s:=s+i;

writeln('Tong cua 10 so tu nhien dau tien la: ',s);

readln;

end.

a) sai:

sửa: for  i:=1 to 10 do write('a');

b) Đúng

c) Đúng

a) Sai

Sửa lại: for i:=10 downto 1 do write('a');

b) Đúng

c) Đúng

a: Sai bởi chỉ số đầu lớn hơn chỉ số cuối

b: Sai vì chỉ số đầu, chỉ số cuối là số thực

c: Sai vì chỗ end thiếu chấm phẩy

d: Sai vì chỉ số đầu lớn hơn chỉ số cuối

e: Sai vì chỉ số đầu và chỉ số cuối là số thực

d: Đúng