Trắc nghiệm : Hãy khoanh tròn vào câu đúng.
Câu 1 : Câu lệnh Pascal sau câu nào đúng ?
a) For i := 1 to 10 ; do x :=x+1 ; b ) For i := 10 to 1 do x :=x+1 ;
c) For i :=1 to 10 do x :=x+1 ; d) For i :=1 to 10 do for i :=1 to 10 do x :=x+1 ;
Câu 2 : Trong câu lệnh lặp for i :=0 to 10 do begin…end ; các lệnh ghép được thực hiện bao nhiêu lần?
a) Không lần nào. B) 11 lần c) 2 lần d) 10 lần
Câu 3 : Sau khi thực hiện chương trình sau biến j,k nhận giá trị bao nhiêu ?
Đoạn chương trình sau :
J :=1 ;k :=2 Đáp án : j =
For i :=1 to 5 do k =
Begin
J :=j+1
K :=k+j ;
Writeln(j,k) ;
End ;
Câu 4 : Trong các hoạt động sau hoạt động nào sẽ được thực hiện lặp lại với số lần chưa biết trước ?
- Tính tổng của 20 số tự nhiên đầu tiên.
- Nhập một số hợp lệ, ví dụ số nguyên trong khoảng từ 0 đến 10 vào máy tính. Nếu số nhập vào không hợp lệ thì được yêu cầu nhập lại.
- Nhập các số từ bàn phím và tính tổng cho đến khi lần đầu tiên nhận được tổng lớn hơn 500 thì kết thúc.
Câu 5 : Hãy tìm hiểu đoạn chương trình sau và tìm giá trị của i,j,k ?
I :=1 ;j :=3 ;k :=4
While i<6 do Đáp án : i =
I :=i+1 ; j =
J :=j+1 ; k =
k :=k+j
writeln(i,j,k)
Câu 6 : Hãy tìm hiểu đoạn chương trình sau đây : Sau khi đoạn chương trình sau được thực hiện, giá trị của x bằng bao nhiêu ?
x :=0 ; tong :=0 ;
while tong<=20 do
begin
writeln(tong) ;
tong :=tong+1 ;
end ;
x :=tong ;
a) 20 b) 21 c) 0 d) không xác định được
II. Tự luận
Câu 1 : Viết chương trình sử dụng for .. do hoặc while ..do để tính tổng.
S = 1 + 
Với n được nhập từ bàn phím.