1) Trong đoạn lệnh sau đây, chương trình đã thực hiện bao nhiêu vòng lặp?

S:=0; i:=0;

While S<=20 do

Begin

S:=S+i; i:=i+1;

end;

a) 2 b) 4 c) 8 d) vô hạn

2) Trong đoạn lệnh sau đây, chương trình đã thực hiện bao nhiêu vòng lặp?

x:=0;

For i:=1 to 5 do x:=x+3;

a) 1 b) 3 c) 5 d) 15

3) Sau khi thực hiện đoạn chương trình sau, giá trị của biến x bằng bao nhiêu?

x:=0;

For i:=1 to 5 do x:=x+3;

a) 1 b) 3 c) 5 d) 15

4) Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu?

S:=0; i:=0;

While S<=20 do

Begin S:=S+i; i:=i+1; end;

a) 18 b) 21 c) 25 d) 52

5) Đoạn chương trình sau đây đã mắc phải lỗi gì?

a:=5;

While a<=6 do Writeln(‘A’);

a) Sử dụng sai cú pháp lệnh While ... do

b) Cho biết trước số lần lặp

c) Không cho biết trước số lần lặp

d) Lặp vô hạn

6) Trong ngôn ngữ lập trình Pascal, câu lệnh For ... do là lệnh:

a) Không cho biết trước số lần lặp

b) Cho biết trước số lần lặp

c) Biết trước hay không biết trước số lần lặp đều sử dụng được

d) Cả a, b, c đều sai

7) Trong ngôn ngữ lập trình Pascal, câu lệnh lặp được dùng để thể hiện:

a) Cấu trúc lặp c) Cấu trúc điều kiện

b) Cấu trúc rẽ nhánh d) Cấu trúc mảng

8) Trong ngôn ngữ lập trình Pascal, lệnh lặp với số lần chưa biết trước là câu lệnh:

a) For ... do c) If ... then ...

b) While ... do d) If ... then ... else...

9) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây hợp lệ?

a) For i:=10 to 1 do Writeln(‘A’);

b) For i:=10.5 to 1.5 do Writeln(‘A’);

c) For i=1 to 10 do Writeln(‘A’);

d) For i:=1 to 10 do Writeln(‘A’);

10) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây hợp lệ?

a) x:=10; While x:=10 do x:=x+5;

b) x=10; While x=10 do x=x+5;

c) x:=10; While x=10 do x:=x+5;

d) x=10; While x:=10 do x=x+5;

Câu 25     Đoạn lệnh sau đây

x:=1;

While x<=10 do

x:=x+1;

Khi nào thì kết thúc vòng lặp While .. do trên?

A. Khi x<10                   B. Khi x = 10                 C. Khi x <=10                D. Khi x>10

Câu 26:     Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì?

          For i:=1 to 5 do write (i:3);

        A. 1   2   3   4   5                                 B.  5   4   3   2   1

        C. Đưa ra i:3                                       D. Không đưa ra kết quả gì

Câu 27:    Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:

A. If a=5 then a:=d+1; else a:=d+2;                 B. If a=5 then a:=d+1 else a:=d;

           C. If a:=5 then a=d+1; else a=d+2;                 D. If a<=5 then a:=d+1 else; a:=d+2;

Câu 28:      Cho đoạn chương trình Pascal sau:

For  i := 1 to 5 do

Begin

y := i;

End;

Sau khi thực hiện đoạn chương trình trên, giá trị của y là bao nhiêu?

A. 3            B.  4            C.  5                     D.   6

Câu 29:      Để tính tổng  S=2 + 4 + 6  … + n; em chọn đoạn lệnh:

Câu 30:      Cho đoạn chương trình Pascal sau:

          x:=3;

For i:=1 to 7 do x:= x+1;

Sau khi thực hiện câu lệnh For, giá trị của x là bao nhiêu?

A. 9                           B. 7                      C. 10                    D. 3

Câu 31:      Tìm giá trị của S trong đọan chương trình dưới đây:  

S := 0;                                                                                           

For  i := 1 to 5 do S := S + i;

A. S = 0           B. S = 1      C. S = 5      D. S = 15

Bài 1: Trong các câu lệnh Pascal sau đây, câu lệnh nào sai và sai ở đâu?

a) While i:=1 to t:=10;
b) While a<=b ; do write(‘b khong lon hon a’);
c) While 1=1 do write(‘Toi lap trinh gioi’);
d) i:=1; while i<10 do sum:=sum+i; i:=i+1;
e) i:=1; x:=5;
while i<x do i:=i+1; write(‘Gia tri cua i la: ’,i);
Bài 2: Hãy cho biết câu lệnh writeln in ra màn hình giá trị của i, j và k là bao nhiêu?
a) Đoạn chương trình 1
i:=1; j:=2; k:=3;
While i<6 do i:=i+1; j:=j+1; k:=k+j;
Writeln(i,’ ’,j,’ ’,k);
b) Đoạn chương trình 2
i:=1; j:=2; k:=3;
While i<6 do begin i:=i+1; j:=j+1; k:=k+j; end;
Writeln(i,’ ’,j,’ ’,k);