
HỘI THI TIN HỌC TRẺ
TỈNH AN GIANG
ĐỀ THI LÝ THUYẾT KHỐI TRUNG HỌC PHỔ THÔNG
NĂM HỌC 2010-2011
Thời gian : 20 phút (không kể thời gian phát đề)
ĐỀ CHÍNH THỨC
SBD:...............PHÒNG :............
ĐỀ A
Các câu hỏi dưới đây để trắc nghiệm kiến thức cơ bản về Tin học, hệ
điều hành Windows, bảo vệ dữ liệu phòng chống virus, về phần mềm Free
Pascal. Đề thi có 20 câu hỏi, mẫu câu hỏi 0.50 điểm; gồm 4 mục trả lời a,
b, c, d; thí sinh chọn mục trả lời đúng nhất.
Lưu ý: đề thi gồm 3 (ba) trang.
Câu 1: Trong môi trường Pascal, cho X1, X2,...Xn là một mảng số thực.
Ðể tính :
ta có đoạn chương trình sau gồm ba lệnh, một lệnh còn bỏ trống . . . :
S:=0;
For i:=1 to N do S := S + X[i];
. . .
Hãy điền lệnh thích hợp vào chỗ . . . :
A. S := S/N; B. Write ('S=', S);
C. ; D. Readln (S);
Câu 2: Trong môi trường Pascal, cho N là biến kiểu nguyên, chọn câu
đúng cú pháp:

A. If N < 10 then write (' Nho hon 10 ') ; else write (' Lon hon 10 ');
B. If N < 10 Write (' Nho hon 10 ') else then write (' Lon hon 10 ');
C. If N < 10 then write (' Nho hon 10 ') else write (' Lon hon 10 ');
D. If N < 10 then N := 10 else N > 20 then write (' N > 20 ');
Câu 3: Trong môi trường Pascal, cho S = 12 + 22 + ... + 1002 . Nhóm lệnh
nào tính sai Giá trị của S:
A. S:=0; FOR i:=1 TO 100 DO S := S + i*i;
B. S:=0; FOR i:=1 TO 100 DO S := S + SQR(i);
C. S:=0; FOR i:=100 DOWNTO 1 DO S := S + i*i;
D. S:=1; FOR i:=1 TO 100 DO S := S + i*i;
Câu 4: Trong môi trường Microsoft Windows, ở cửa sổ Windows
Explore, để chọn một lúc các file hoặc folder nằm không kề nhau trong
một danh sách :
A. Nhấp chuột ở mục đầu, giữ phím Shift và nhấp chuột từng mục muốn
chọn trong danh sách
B. Nhấp chuột ở mục đầu, giữ phím Ctrl và nhấp chuột từng mục muốn
chọn trong danh sách
C. Nhấp chuột ở mục đầu, giữ phím Alt và nhấp chuột từng mục muốn
chọn trong danh sách
D. Nhấp chuột ở mục đầu, giữ phím Ctrl-Alt-Shift và nhấp chuột từng
mục muốn chọn trong danh sách

Câu 5: Khi đang làm việc với Microsoft Windows, muốn khôi phục lại đối
tượng đã xóa trong Recycle Bin, ta thực hiện:
A. Chọn đối tượng, rồi chọn File - Copy B. Chọn đối
tượng, rồi chọn File - Open
C. Chọn đối tượng, rồi chọn File - Restore D. Chọn đối
tượng, rồi chọn File - Move To...
Câu 6: Khi đang làm việc với Microsoft PowerPoint, muốn trình diễn tài
liệu được soạn thảo, ta thực hiện:
A. File - View Show C. Window -
View Show
C. Slide Show - View Show D. Tools - View Show
Câu 7. Trong Microsoft Word, tổ hợp phím nào cho phép ngay lập tức đưa
con trỏ về cuối văn bản?
A. Ctrl+End B. Alt+End
C. Shift+End D. Ctrl+Alt+End
Câu 8. Trong soạn thảo Microsoft Word, muốn đánh số trang cho văn bản,
ta thực hiện:
A. View - Page Numbers B. Insert - Page Numbers
C. Tools - Page Numbers D. Format - Page Numbers
Câu 9. Trong bảng tính Microsoft Excel, tại ô A1 có giá trị là chuổi “HOI
THI TIN HOC TRE TINH AN GIANG”. Tại ô B5 gõ công thức
=LEFT(A1,3)&RIGHT(A1,5) thì nhận được kết quả?

A. HOI B. HOI THI
C. HOIGIANG D. AN GIANG
Câu 10. Trong bảng tính Microsoft Excel, tại ô A1 có giá trị là số nguyên
3, ô B1 có giá trị là số nguyên 5 và ô C1 có giá trị là số nguyên 7. Tại ô B5
gõ công thức =IF(A8>B8,"A>B",IF(C8>B8,"C>B","A>C"))) thì nhận
được kết quả?
A. A>B B. C>B
C. A>C D. #VALUE!
Câu 11: Trong môi trường Pascal, để tính gía trị , chọn cách viết
nào:
A. x := -b/2a; B. x := -b/2*a;
C. D. x := -b/2/a;
Câu 12: Trong môi trường Pascal, biến X được khai báo là kiểu integer.
Lệnh nào sai:
A. X:= round(275/3); B. X:= 210 div 4;
C. X:= SQRT(49); D. X:= ABS(-453);
Câu 13: Trong môi trường Pascal, chương trình sau sẽ xuất ra màn hình
kết quả:
Var a, b, c, N : integer;
Begin
N:=546;

a:=N div 100;
b:=(N Mod 100) div 10;
c:=(N Mod 100) Mod 10;
Write(a+b+c);
End.
A. 546 B. 15
C. 5 D. 6
Câu 14: Trong môi trường Pascal, khai báo kiểu liệt kê như sau là sai:
Type
Mau = (XANH, do, tim, Vang);
vì :
A. Tên XANH viết chữ hoa; B. Tên do trùng với từ khóa;
C. Tên tim viết chữ thường; D. Tên Vang có chữ V hoa;
Câu 15: Trong môi trường Pascal, cho khai báo:
Var A: Array[1..4] of Real;
i : Integer ;
Ðể nhập dữ liệu cho A, chọn câu nào:
A. For i:=1 to 4 do Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]);
B. For i:=1 to 4 do Readln(‘ Nhập A[‘, i, ‘]:’);
C. For i:=1 to 4 do Begin Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); End;