Mục Tiêu
Mục Tiêu
Rèn luyện kỷ năng sử dụng các câu lệnh
lặp kết hợp câu lệnh có điều kiện dưới
dạng câu hỏi trắc nghiệm

Câu 1: Trong vòng lặp For <biến đếm>:=<giá trò đầu>
to <giá trò cuối> do <câu lệnh> của Pascal, trong mỗi
vòng lặp, biến đếm thay đổi như thế nào?
A. +1
D. Một giá trò khác không
B. -1
C. Một giá trò bất kỳ

Câu 2: Phát biểu nào sau đây là đúng ?
A. Cấu trúc lặp được sử dụng để chỉ thò cho máy tính thực hiện
lặp lại một vài hoạt động nào đó cho đến khi một điều
kiện nào đó được thoả mãn.
D. Ngôn ngữ Pascal thể hiện cấu trúc lặp với số lần lặp chưa
biết trước bằng câu lệnh For…do
B. Chỉ ngôn ngữ lập trình Pascal mới có các câu lệnh lặp
để thể hiện cấu trúc lặp.
C. Ngôn ngữ Pascal thể hiện cấu trúc lặp với số lần lặp
cho trước bằng câu lệnh While…do

Caõu 3: Caõu leọnh pascal naứo sau ủaõy laứ
Caõu 3: Caõu leọnh pascal naứo sau ủaõy laứ
hụùp leọ?
hụùp leọ?

…
End
A. Không lần nào
B. 2 lần
C. 1 lần
D. 10 lần
Câu lệnh ghép được thực
hiện bao nhiêu lần (bao
nhiêu vòng lặp được thực
hiện)

Câu 6: Để tính tổng S= 2+4+6… + n; em chọn đoạn lệnh:
Câu 6: Để tính tổng S= 2+4+6… + n; em chọn đoạn lệnh:
A
for i:=1 to n do
if ( i mod 2)=0 then
S:=S + i;
C
for i:=1 to n do
if ( i mod 2)=1 then
S:=S + i;
B
for i:=1 to n do
S:= S + i ;
D
for i:=1 to n do
if ( i mod 2)<>0 then
S:=S + i;

Câu 7: Để tính tổng S=1+ 3 + 5 … + n;

câu lệnh lặp
for i:=1 to 10 do x:=x+1
for i:=1 to 10 do x:=x+1
; thì
; thì
biến đếm i phải được khai báo là kiểu
biến đếm i phải được khai báo là kiểu
dữ liệu
dữ liệu
A. Interger;
B. Real;
C. String;
D. Tất cả các kiểu trên đều được

Câu 11: Sau khi thực hiện đoạn chương
Câu 11: Sau khi thực hiện đoạn chương
trình
trình
•
thì giá trò j là?
thì giá trò j là?
A.
A.
4
4
B.
B.
5
5
C.

A. If x : = a + b then x : = x + 1;
B. If a > b then max = a.
C. If a > b then max : = a ; else max : = b;
D. If 5 = 6 then x : = 100;

Câu 14 : Gán giá trị của X bằng 5. Sau khi
cho máy thực hiện câu lệnh
If (X mod 3) = 2 then X := X + 1;
thì giá trị của X sẽ là bao nhiêu ?
A. 6
B. 5
C. 7
D. 4

Câu 15
Câu 15
: Đoạn lệnh sau đây :
: Đoạn lệnh sau đây :
sẽ cho kết quả gì ?
So : = 1;
While So < 15 do
begin
writeln(So);
So : = So + 1;
End;
A. In ra các số từ 1 đến 15;
B. In ra các số từ 1 đến 14;
C. In ra vô hạn các số 1,
mỗi số viết trên một
dòng;