1. Lệnh lặp nào sau đây là đúng? A: For <biến đếm>=<giá trị đầu> to <giá trị cuối> do <câu lệnh>; B: For < biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>; C: For <biến đếm>:=<giá trị cuối> to < giá trị đầu> do <câu lệnh>; D: For <biến đếm>:<giá trị đầu> to <câu lệnh> do <giá trị cuối>; 2.Chọn câu khai báo hợp lệ: A: Var a,b: array[1..n] of real; B: Var a,b: array[1..100] of real; C: Var a,b: array[1 : n] of real; D: Var a,b: array[1...100] of real; 3.Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:=16; T:=50; While n>10 do Begin n:=n-5; T:=T - n; end; A: 2; B: 3; C: 4; D: 5; 4. Cho đoạn chương trình sau : S:=10; x:=0.5; While S>=6.2 do S:=S-x; Hãy cho biết giá trị của S sau đoạn chương trình trên. A: 5 B: 4 C: 6 D: 7 5. Câu lệnh nào phù hợp? A: While(x mod 3=0) do s:=s+1; B: While(x mod 3) do s:=s+1; C: While(x mod 3=0); do s:=s+1; D: While(x:=x mod 3) do s:=s+1;

1. Lệnh lặp nào sau đây là đúng?

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

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

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

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

2.Chọn câu khai báo hợp lệ:

A: Var a,b: array[1..n] of real;

B: Var a,b: array[1..100] of real;

C: Var a,b: array[1 : n] of real;

D: Var a,b: array[1...100] of real;

3.Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn

chương trình n:=16; T:=50;

While n>10 do Begin n:=n-5; T:=T - n; end;

A: 2; (vì n=16-5=11 điều kiện vẫn đúng nên chạy tiếp n=11-5=6 điều kiện sai dừng lại. Vậy có 2 vòng lặp)

B: 3;

C: 4;

D: 5;

4. Cho đoạn chương trình sau :

S:=10; x:=0.5;

While S>=6.2 do

S:=S-x;

Hãy cho biết giá trị của S sau đoạn chương trình trên.

A: 5

B: 4

C: 6

D: 7

5. Câu lệnh nào phù hợp?

A: While(x mod 3=0) do s:=s+1;

B: While(x mod 3) do s:=s+1;

C: While(x mod 3=0); do s:=s+1;

D: While(x:=x mod 3) do s:=s+1;

1.B

2.B

3.A

4.C

5.A

${Oken}$