Câu 2: Hãy chỉ ra lỗi trong các câu lệnh sau đây?
a) X:= 10;
While X:= 10 do
X:= X + 5;
b) X:= 10;
While X = 10 do
X = X + 5;
c) S:= 0; n:=0;
While S <= 10 do
n:= n + 1;
S:= S + n ;
Câu 3: Câu lệnh sau đây cho kết quả là gì?
S:=1;
While s < 10 do
Begin
writeln(s);
s:=s+1;
end;
a. Sai ở : while X:=10
X:= 10; while X: = 10 do X: = X + 5;
sửa thành X:= 10; while X = 10 do X : = X + 5;
b. Sai ở : X = X + 5
X:= 10; while X = 10 do X = X + 5;
Sửa thành : X:= 10; while X = 10 do X : = X + 5;
c. Thiếu begin và end trong vòng lặp
Sửa thành
S:= 0; n:=0;
while S <= 10 do Begin n:= n + 1; S:= S + n ;end;