Câu 32: Kiểu dữ liệu nào có thể chứa nhiều thành phần dữ liệu có kiểu dữ liệu khác nhau thành một nhóm duy nhất: A.. Để khai báo hằng thông qua từ khóa: Câu 33: Trong Window Explorer,
Trang 1ĐẠI HỌC THÁI NGUYÊN
TRƯỜNG ĐẠI HỌC CNTT&TT
Mã đề thi: 235
Đề thi gồm có 50 câu
ĐỀ THI HẾT HỌC PHẦN Môn thi: TIN HỌC ĐẠI CƯƠNG Hệ: ĐHCQ
Thời gian làm bài 60 phút, không kể thời gian giao đề
Họ và tên thí sinh: Số báo danh:
Câu 1: Bộ nhớ trong của máy tính gồm:
Câu 2: Máy tính hoạt động dựa trên nguyên tắc nào:
A Tự động điều kiển dựa trên chương trình B Không tự động điều kiển
C Dựa vào chương trình D Tự động điều kiển
Câu 3: Bộ xử lý trung tâm (CPU) là:
A Nơi nhập thông tin cho máy B Nơi lưu trữ thông tin cho máy
C Nơi xử lý, quyết định, điều khiển mời
hoạt động máy tính
D Nơi thông báo kết quả cho người sử
dụng
Câu 4: Số BE trong hệ Hexan bằng bao nhiêu trong hệ nhị phân?
Câu 5: Số 10111000 trong hệ nhị phân bằng bao nhiêu trong hệ Hexan?
Câu 6: Số 1011100 trong hệ nhị phân bằng bao nhiêu trong hệ 10?
Câu 7: Cụm từ viết tắt nào sau đây mang ý nghĩa mạng cục bộ:
Câu 8: Hệ điều hành được chia làm mấy loại:
Câu 9: Các trạm hoạt động trong một mảng vừa như máy phục vụ, vừa như máy khách có thể
tìm thấy trong mạng:
Câu 10: Cho chương trình sau:
Var y: integer;
x:real;
Begin
y:=16;
x:= arctan(sin(y))con(y)0;
x:= x sh 1;
End
Hãy cho biết kết quả khi chạy chương trình trong Turbo Pascal:
A 8 OE+00 B Error 41: operand rypy a do
not match
C 8.0000E+00 D 00 Câu 11: Để nhập một số nguyên n nằm trong [5,20]ư ta chọn đoạn lệnh:
Trang 2A n=0;
repeat
readln(n);
until ((n<=5)
and (n<=20));
B n=0;
repeat readln(n);
until ((n>=5) or (n<=20));
C n=0;
repeat readln(n);
until ((n>=5) and (n<=20));
D n=0;
repeat readln(n); until ((n<=5) and (n>=20));
Câu 12: Xét chương trình Pascal sau:
Program a;
Type i=set of 1_20;
Var 1:i; s:integer;
Function X(m:integer):integer;
Begin
If m in1 then x:=x(m+4)+2
Else x:=1
End;
Begin
1:=[3,7,14,18]; s:=x(3); write(s)
End
Kết quả sau khi thực hiện chương trình là:
Câu 13: Trong Pascal hàm trunk (4,5) trả về kết quả?
Câu 14: Phép toán nào trong các phép toán sau không thực hiện với số thực?
Câu 15: Cho đọan chương trình sau:
Var x,y:integer;
Begin
x:=1;
y:=2;
x:=not (x or y);
writeln(x);
End
Hãy cho biết kết quả khi chạy chương trình?
Câu 16: Cho bài toán x:=1*2*2* n để giải bài toán này ta sử dụng câu lệnh for với biến đếm i
có giá trị đều là 1 và cuối là n Hãy cho biết s khỏi gần bằng bao nhiêu, câu lệnh trong vòng lặp for là gì?
A Khởi gán x:=1, câu lệnh s:=x*i; B Khởi gán x:=0, câu lệnh s:=x*i
C Khởi gán x:=0, câu lệnh s:=x+x*i; D Khởi gán x:=1, câu lệnh s:=x+x*i; Câu 17: Cho i là biến nguyên, khi chạy đoạn chương trình:
i:=5;
Trang 3repeat
i:=i+1;
until i>4;
Giá trị sau cùng của i là?
Câu 18: Cho đoạn chương trình sau:
Var x:integer;
y:real;
Begin
y:=16;
x:=arctan(sin(y))con(y);
x:=x shl 1;
end
Hãy cho biết kết quả khi chạy chương trình?
Câu 19: Cho biết giá trị của S sau khi ra khỏi vòng lặp:
S:=0; i:=0; while(i<=10) do begin x:=x+i; i:=i+1;
End
Câu 20: Trong Pascal, màn hình có mấy chế độ hiển thị?
Câu 21: Pascal không cho phép đơn trực tiếp vào định nghĩa kiểu con trỏ với kiểu dữ liệu:
Câu 22: Cho A là mảng một chiều, n phần tử, kiểu Integer, i,tg là các biến integer Doạn
chương trình sau thực hiện nhiệm vụ gì?
For i:=1 to (n – 1) do
For j:= i + 1 to n do
If (A[j] > A[j] ) then
Begin
Tg:=A[i];
A[i]:=A[j];
A[j]:=tg;
End
A Tìm phần tử nhỏ nhất trong mảng B Sắp xếp A theo chiều giảm dần
C Sắp xếp A theo chiều tăng dần D Tìm phần tử lớn nhất trong mảng Câu 23: Function MT ( a:integer): integer;
Begin
If (a = 0) or (n – 1) then MT:=1;
Else MT:= n*MT(n – 1);
Trang 4End;
Hàm trên thực hiện chức năng gì?
A Tìm giai thừa của một số B Tính tổng các số chính phương <a
C Tính tổng các số hoàn hảo <a D Tính tổng các số <a
Câu 24: Cho đoạn chương trình sau:
Var x,y: integer;
Begin
Write (‘ vao i =’); readln(i);
Case Mod 2 of
0: writeln(‘ chia hết cho 2’);
1:writeln(‘không chia hết cho 2’);
End;
Else writeln(‘là số khác 2’);
End
Khi thực hiện biên dịch chương trình xuất hiện thông báo:
A Error 91: ‘:=’ expected
B Error 74: constant anh case types do not match
C Error 113: error in statem
D Error 85: ‘,’ expected
Câu 25: Đơn vị đo dung lượng bộ nhớ máy tính:
Câu 26: Đang làm việc với máy tính thì máy tính bị treo, để khởi động lại máy tính ta chọn
thao tác nào?
A Crt – alt del – shift B Nhấn Reset C Shift – alt – del D Crt – shift – del Câu 27: Các chương trình làm nhiệm vụ điều khiển mọi hoạt động của máy tính là:
A Phầm mềm hệ thống
B Các loại chương trình dịch trong
C Phần mềm tiện ích
D Họ các ngôn ngữ lập trình
Câu 28: Số 168 trong hệ thập phân bằng bao nhiêu trong hệ nhị phân?
A 10101001 B 10101010 C 10101000 D 10101100 Câu 29: Chọn kết quả của phép trừ số nhị phân: 111110 – 11111:
Câu 30: Hệ điều hành Window danh sách các mục chọn trong thực đơn gọi là:
A Menu bar B Menu optios C Menu start D Menu pad Câu 31: Hủy chọn 1 thu mục trên màn hình nền Derktop:
A Ckick chuột vào thư mục hoặc Double click chuột vào thư mục
B Double click chuột vào thư mục
C Click chuột vào thư mục
Trang 5D Click chuột vào vị trí bất kỳ trên màn hình
Câu 32: Kiểu dữ liệu nào có thể chứa nhiều thành phần dữ liệu có kiểu dữ liệu khác nhau thành
một nhóm duy nhất:
A Kiểu bản ghi B Con trỏ cấu trúc C Kiểu số nguyên D Con trỏ
Câu 33 Để khai báo hằng thông qua từ khóa:
Câu 33: Trong Window Explorer, để đánh dấu tất cả các đối tượng trong cửa sổ Folder hiện tại,
ta nhấn phím:
Câu 33: Cấu trúc Unit bao gồm có mấy phần cơ bản:
Câu 34: Cho bản ghi: sinh_vien gồm các trường ho_ten, ngay_sinh Biểu thức nào sau đây truy
cập đến trường ho_ten trong bản ghi này?
A Sinh_vien(ho_ten, ngay_sinh) B Sinh_vien ho_ten
Câu 35: Biến địa phương là các biến được khai báo ở:
A Trong hàm thủ tục B Trong chương trình chính
C Trong thân thủ tục D Trong thân hàm
Câu 36: Phát biểu nào sau đây là sai về lệnh while< biểu thức điều kiện> do <công việc>:
A Nếu < biểu thức điều kiện> ngay từ đầu đã nhận giá trị Falce thì <công việc> không được
thực hiện lần sau
B Nếu < biểu thức điều kiện> ngay từ đầu đã nhận giá trị True thì <công việc> không được
thực hiện lần sau
C <công việc> có thể là câu lệnh ghép
D Khi<công việc> bao gồm nhiều lệnh thì phải đặt trong các từ khóa: begin, end
Câu 37: hợp của [1 5] + [3 20,20] là tập hợp nào?
A [1 20] B [1 10,20] C [1 5] D [3 5]
Câu 38: Cho chương trình sau:
Var x:integer;
Const c=1;
Begin
x:= (max:int+c) – 1 ;
write(x);
End
Hãy cho biết kết quả khi chạy chương trình:
A Error : “(“ expected B 32767 C 0 D – 32767
Câu 39: Cho chương trình sau:
Var x,y:integer;
Begin
x:=12;
Trang 6x:=xdiv2;
if ((x>=2) and ( )
Hãy cho biết kết quả khi chạy chương trình:
Câu 40: Để có thể chạy chương trình trong Tubol Pascal, cần tối tiểu các file nào?
A TURBO.EXE, TURBO.TPL
B TURBO.EXE
C TURBO.TPL
D TURBO.EXE, TURBO.TPL, TORBO.TPU
Câu 41: Phạm vi giá trị của kiểu integer đó là:
A – 32768 32768 B – 32768 32767 C – 32767 32767 D – 32767 32768 Câu 42: Ngôn ngữ lập trình Pascal ra đời năm :
Câu 43: Cách chọn nhóm đối tượng rời rạc trong Windows:
A Nhấn chuột chọn một biểu tượng, giữ Shift và nhấn chuột vào biểu tượng muốn chọn
khác
B Nhấn chuột chọn một biểu tượng, giữ Del và nhấn chuột vào biểu tượng muốn chọn khác
C Nhấn chuột chọn một biểu tượng, giữ Alt và nhấn chuột vào biểu tượng muốn chọn khác
D Nhấn chuột chọn một biểu tượng, giữ Ctrl và nhấn chuột vào biểu tượng muốn chọn
khác
Câu 44: thành phần nào sau đây trong hệ điều hành Windows có khả năng tự nhận biết thiết bị
phần cứng và tự động cài đặt cấu hình của thiết bị:
Câu 45 : Cho đoạn chương trình sau:
Var x:integer;
y:read;
Begin
y:=16;
x:=ln(exp(y));
x:=x div 5;
Write(x);
End
Hãy cho biết kết quả khi chạy chương trình:
Câu 46: Cho chương trình:
Var n,i:integer;
St:= string[20];
Begin
Trang 7St: ‘12345’;
While(i<length(st)) do
Begin
n:= n – length(st);
i:=i+1;
End;
Writeln(n);
Readln;
End
Giá trị của n sau khio thực hiện chương trình là:
Câu 46: Cho yêu cầu bài toán như sau: “ năm nay bờm có n cái quạt mo (n 10) nhập vào từ bàn phím Cứ sau mỗi năm bờm bán toàn bộ số quạt đang có và mua quạt mới Cứ mỗi quạt cũ bán đi thì mua được 2 quạt mới Hãy viết chương trình tính giúp bờm xem sau 3 năm thì bờm
có bao nhiêu quạt? Chương trình nào dưới đây là tối ưu và đáp ứng yêu cầu trên:
A Var n:byte;
Begin
Write(‘nhap so quat nam nay:’);
Readln(n);
Write (‘so quat = ‘,n*2*2);
End
B Var n:word;
Begin Write(‘nhap so quat nam nay:’);
Readln(n);
Write (‘so quat = ‘,n*2*2*2*2);
End
C Var n:byte;
Begin
Write(‘nhap so quat nam nay:’);
Readln(n);
Write (‘so quat = ‘,n shl 3);
End
D Var n:word;
Begin Write(‘nhap so quat nam nay:’);
Readln(n);
Write (‘so quat = ‘,n shl 3);
End
Câu 46: Hệ điều hành là:
A Hệ thống cung cấp các phương tiện tác động với phần cứng, tạo ra môi trường làm
việc giữa người và máy
B Hệ thống tạo ra môi trường làm việc giữa người và máy
C Hệ thống các chương trình điều khiển mọi hoạt động của máy tính, cung cấp các
phương tiện tác động tới phần cứng, tạo ra môi trường làm việc giữa người và máy
D Hệ thống các chương trình điều khien mọi hoạt động của máy tính
Câu 47: Cho chương trình con:
Type ten=(Hong, Hoa, Hue, Ly, Lan, Nhai);
Var x: ten;
Begin
x: = Hoa;
Trang 8x:= sncc(x);
if x = Hue then writeln(‘Hue’) else if x= Hong then writeln(‘Hong’) else writeln(‘Hoa’);
end
Hãy cho biết kết quả khi chạy chương trình ( bấm tổ hợp phím ctrl + F9 trong turbor pascal):
Câu 48:Cho p là một con trỏ Thủ tục New(p) có ý nghĩa gì ?
A Tạo một biến dạng kiểu p để có thể truy nhập vào vùng dữ liệu của đối tượng
B Cấp phát vùng nhớ trên fleap với kích thước kiểu dữ liệu mà con trỏ trỏ đến Tạo một
biến động định kiểu p để có thể truy nhập vào vùng dữ liệu của đối tượng Lưu địa chỉ của đối tượng cho con trỏ p
C Lưu địa chỉ của đối tượng cho con trỏ p
D Cấp phát vùng nhớ trên fleap với kích thước kiểu dữ liệu mà con trỏ trỏ đến
Câu 49: Kiểu dữ liệu real (kiểu số thực) có thể sử lý các số trong phạm vi :
A -128 >> 127
B 0>>65535
C 2.9*10^-38 đến 1.7*10^38
D -32768 >> 32767
Câu 50: Biểu thức 25 div 3 + 5/2*3 có giá trị là ?
-Hết -
Thí sinh KHÔNG được sử dụng bất cứ tài liệu nào
CB coi thi không giải thích gì thêm và nộp lại đề thi cho phòng chức năng theo quy chế của
Bộ
Sưu tầm: Cao Văn Tú
Trường: ĐH CNTT&TT Thái Nguyên