I) câu 1: câu lệnh pascal sau đây đúng hay sai sai ở đâu và sửa lại cho đúng vs câu lệnh: a)FOR i:=2 to 10 ; DO x:=x+1; b)FOR i:=1 to 10 for j :=1 to 10 do x :=x+1; c)FOR i:= 11 to 1 do x:= x+1; d)FOR i:= 1 to 10 do for i:= 1 to 10 do x := x+1 ; e) While i:=1 do t := 10; f) while b>=a; do write ('b khong nho hon a'); g) while 2=2 do write (' toi that la gioi'); h) var x: array [10,13] of integer; i)var x: array[3,4...4,8] of integer; j)var x: array[10...1]of integer;

câu 1:

a) sai, dư dấu ; sau giá trị cuối
sửa: for i:=2 to 10 do x:=x+1;

b) sai cú pháp for-do đầu(thiếu do)

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

c) sai, giá trị cuối lớn hơn giá trị đầu

sửa: for i:=1 to 11 do x:=x+1;

d)sai, 2 vòng lặp trùng biến đếm

sửa: FOR i:= 1 to 10 do for j:= 1 to 10 do x := x+1 ;

e)sai, sau while phải là 1 phép gán

sửa: While i=1 do i := 10;

f)sai, sau điều kiện bị dư dấu ;

sửa: while b>=a do write ('b khong nho hon a');

g) sai, điều kiện luôn đúng nên sẽ lặp vô hạn lần
sửa: i:=2; while i=2 do begin write (' toi that la gioi'); i:=i+1; end;

h) sai, từ chỉ số đầu đến chỉ số cuối phải là hai dấu chấm

sửa: var x: array[10..13] of integer;

i)sai, chỉ số đầu và chỉ số cứu phải là giá trị nguyên và ở giữa phải là hai dấu chấm

sửa: var x: array[3..4] of integer;

j)sai, giá trị đầu lớn hơn giá trị cuối và giữa 2 giá trị phải là hai dấu chấm

sửa: var x: array[1..10] of integer;