Trường THPT Trần Phú
Tổ: Toán - Tin
KIỂM TRA MỘT TIẾT
Môn: Tin học - Khối 11 (BAN C) LẦN 1
Họ tên: ........................................Lớp: ....................
1. Phát biểu nào sau đây đúng với câu lệnh rẽ nhánh:
Sau then muốn thực hiện nhiều câu lệnh thì các lệnh phải đặt giữa Begin; và End.
Sau then muốn thực hiện nhiều câu lệnh thì các lệnh phải đặt giữa hai dấu ngoặc đơn
Sau then muốn thực hiện nhiều câu lệnh thì các lệnh phải đặt giữa Begin và End.
Sau then muốn thực hiện nhiều câu lệnh thì các lệnh phải đặt giữa Begin và End;
2. Đoạn chương trình sau đưa ra màn hình kết quả nào:
for i:= 1 to 10 do write(i);
Đưa ra 10 cấu cách 1 2 3 4 5 6 7 8 9 10
Không đưa ra gì cả 10 9 8 7 6 5 4 3 2 1
3. Câu lệnh if nào sau đây đúng:
if a= 5 then a:= d+1 else a:= d+2; if a= 5 then a:= d+1 else a:= d+2.
if a= 5 then a:= d+1; else a:= d+2; if a= 5 then a= d+1 else a= d+2;
4. Cho S và i là biến nguyên. Khi chạy đoạn chương trình
for i:=1 to 10 do s := s+i;
writeln(s);
Kết quả xuất ra màn hình là
100 55 11 101
5. Cho đoạn chương trình sau:
Var S, i : Integer;
Begin
i := 3; S:= 40;
if ( i > 5 ) then S:= 5 * 3 + ( 5 - i ) * 2
else
if ( i > 2 ) then S:= 5 * i
else S:= 0;
End.

Begin
a:= d+1;
b:= 2;
End;
else a:= d+2;
if a = 5 then
Begin
a:= d+1;
b:= 2;
End
else a:= d+2;
if a = 5 then
a:= d+1;
b:= 2;
else a:= d+2;
if a = 5 then
Begin
a:= d+1;
b:= 2;
End
else a= d+2;
12. Để tính tích T:= 1*2*4*5*..*n ( n là số nguyên nhập từ bàn phím)
Câu lệnh nào đúng
t:= 1; for i:=1 to n do t:= t*i; t:= 0; for i:=1 to n do t:= t*i;
t:= 1; for i:=1 to n do t:= t*n; t:= 1; for i:=1 to n do t:= t+i;
13. Để tính tổng các ước thực sự của N ( ứơc thực sự là ước không kể chính nó). Câu lệnh nào đúng
t:=0; for i:= 1 to n-1 do if n div i = 0 then t:= t+i; t:=1; for i:= 1 to n-1 do if n div i = 0 then t:= t+i;
t:=0; for i:= 1 to n-1 do if n mod i = 0 then t:= t+i;
t:=1; for i:= 1 to n-1 do if n mod i = 0 then t:= t+i;
14. Trong ngôn ngữ lập trình Pascal về mặt cú pháp cách viết câu lệnh ghép nào sau đây đúng:

5 4 3 2
19. Kiểm tra 3 số a,b,c đều lớn hơn 1 thì xuất ra màn hình số 1.Chọn lệnh nào
if (a > 1) or (b > 1) or (c > 1) then write(1); if a > 1 and b > 1 and c > 1 then write(1);
if (a > 1) and ( b > 1) and ( c > 1) then write(1); if a, b , c đều > 1 then write(1);
20. Đoạn chương trình sau tính gì:
t:= 0; for i:=1 to n do if (i mod 3 = 0) then t:= t+i*i;
Tổng các số nguyên torng phạm vi từ 1 đến n
tổng các số chia hết cho 3 trong phạm vi từ 1 dến n
Tổng bình phương các số chia hết cho 3 trong khoảng từ 1 đến n
Tính tổng bình phương các số trong phạm vi từ 3 đến n