de tin dhbk

Đại Học Quốc Gia Tp.HCM Họ và tên:…………………… Trường Đại học Bách Khoa Tp.HCM MSSV:………………… Khoa Công Nghệ Thông Tin @@@@@ ĐỀ KIỂM TRA CUỐI KỲ MÔN: TIN HỌC 1 ĐỀ 1 Thời gian: 90 phút (Không được phép sử dụng tài liệu) Câu 1. Cho biết kết quả của đoạn code sau: I = 0 Do I = I + 1 Loop While (I > 0 And I < 20) While (I > 0) Print I I = I \ 2 Wend Chọn câu đúng: 1. Compiler error 2. Không in ra gì cả/ 3. In ra các số 0 1 2 5 10 4. Tất cả đều sai Câu 2. Cho hàm zzz( ) như sau: Private Function zzz(N As Integer) As Integer Dim F0 As Integer, F1 As Integer, Fn As Integer F0 = 1 : F1 = 1 If (N <= 0) Then zzz = N ElseIf (N > 1) Then For i = 1 To N F0 = F1 : F1 = Fn : Fn = F0 + F1 Next i End If zzz = Fn End Function Chọn câu đúng: 5. zzz(0) là 0, zzz(10) là 256. 6. zzz(0) là 1, zzz( 10 ) là bằng 55. 7. zzz(-10) = -10, zzz( 10 ) là bằng 55. 8. Tất cả đều sai./ Câu 3. Cho đoạn code sau: Private Sub Test3() X = 45 If (X >= 50) Then If (X / 10 >= 8) Then Print "Gioi" ElseIf (X / 10 < 7) Then Print "TB" Else Print "Kha" End If Else Print "Yeu" End If End Sub Chọn câu đúng: 1. In ra “Gioi” 2. In ra “TB” 3. In ra “Yeu” 4. Tất cả đều sai. Câu 4. Chọn câu đúng về máy tính số: 1. Máy tính số có thể thực hiện vô hạn số lệnh. 2. Máy tính số không thể thực hiện các lệnh tự động. 3. Cả a và b đều đúng. 4. Cả a và b đều sai. Câu 5. Chọn câu đúng: 1. Việc lập trình được tự động hóa hoàn toàn bởi máy tính số. 2. Lập trình bằng ngôn ngữ máy rất dễ. 3. Mỗi lệnh máy tương đương với một hay nhiều công việc ngoài đời. 4. Tất cả đều sai. Câu 6. Chọn câu đúng: 1. Ngôn ngữ máy mô tả lệnh ở dạng từ gợi nhớ. 2. Ngôn ngữ Assembly mô tả lệnh ở dạng nhị phân. 3. Visual Basic không thuộc loại ngôn ngữ hướng đối tượng. 4. Tất cả đều sai. Câu 7. Chọn câu đúng về mô hình Von Neumann: 1. CPU có thể đọc lệnh thực thi trực tiếp từ I/O. 2. CPU thực hiện từng lệnh của chương trình. 3. Memory chứa code và data của chương trình. 4. Tất cả đều sai. Câu 8. Cho đoạn chương trình sau: Const N = 10 Private Sub Form_Paint() Dim N As Integer N = 2 : Print N End Sub Chọn câu đúng: a. VB không thể compile chương trình này được. b. In ra số 2 c. In ra số 10 d. Tất cả đều sai. Câu 9. Chọn câu đúng. Các phần tử của mảng có thể có kiểu dữ liệu khác nhau. Dữ liệu ‘Day la mot chuoi hop le’ là một String. Dim a(100)# Tất cả đều sai. Câu 10. Cho đoạn chương trình sau: Private Sub Form_Paint() Dim XX As Double XX = 1 Print XX XX = "Hello world" Print XX End Sub Chọn câu đúng: 1. In ra số 1 và chuỗi “hello world”. 2. VB báo lỗi không compile chương trình này được. 3. Chương trình chạy và bị lỗi Runtime error. 4. Bỏ dòng “Dim XX As Double” thì chương trình chạy đúng. Câu 11. Chọn phát biểu đúng về chương trình con (function, subroutine): 1. Chương trình con là 1 đoạn code thực hiện chức năng được dùng nhiều lần ở nhiều vị trí trong chương trình. 2. Chương trình con được phép thao tác trên dữ liệu cục bộ của mình, không được truy xuất đến dữ liệu toàn cục. 3. Sử dụng nhiều chương trình con làm cho chương trình mất đi tính cấu trúc. 4. Các câu trên đều sai. Câu 12. Trong mô hình máy tính số Von Neumann: 1. Bộ nhớ (memory) dùng để lưu trữ dữ liệu và kết quả của chương trình, để có thể sử dụng lại sau này. 2. Đơn vị xử lý chứa code của toàn bộ chương trình đang thực thi, và thực thi tuần tự từng lệnh một. 3. Máy tính số có các thành phần cơ bản: Bộ nhớ (memory), Đơn vị xử lý (CPU), Các thiết bị vào ra (I/O), Bus giao tiếp. 4. Các câu trên đều đúng. Câu 13. Chọn câu đúng về chương trình OOP: a) Có dữ liệu toàn cục. b) Mỗi đối tượng có dữ liệu riêng của nó. c) Thuộc tính của đối tượng là cố định trong suốt thời gian sống. d) Mọi tác vụ của đối tượng phải được đưa vào interface. a = 0 For i = 1 To 10 For j = 1 To 10 If i = j Then a = a – 1 (1) a = a + 1 Next j Next i Print a Câu 14. Kết quả của lệnh Print a là: a) 70 b) 80 c) 90 d) 100 Câu 15. Nếu thay dòng (1) bằng If i = j Then Exit For thì kết quả của lệnh Print a là: a) 45 b) 60 c) 75 d) 90 Private Sub A(x As Integer, ByVal y As Integer) (2) Dim z As Integer Dim t As Integer z = z + x t = t + y x = x + z y = y + t End Sub Private Sub Command1_Click() Dim m As Integer m = 10 n = 20 Call A(m, n) Print m, n (3) Call A(m, n) Print m, n (4) End Sub Câu 16. Kết quả của lệnh Print m, n ở dòng (3) là: a) 10 20 b) 20 20 c) 20 10 d) Chương trình báo lỗi Câu 17. Kết quả của lệnh Print m, n ở dòng (4) là: a) 40 20 b) 20 20 c) 20 40 d) Chương trình báo lỗi Câu 18. Nếu thay dòng (2) bằng Private Static Sub A(x As Integer, ByVal y As Integer), kết quả của lệnh Print m, n ở dòng (3) là: a) 40 20 b) 20 20 c) 20 40 d) Chương trình báo lỗi Câu 19. Nếu thay dòng (2) bằng Private Static Sub A(x As Integer, ByVal y As Integer), kết quả của lệnh Print m, n ở dòng (4) là: a) 30 20 b) 20 30 c) 50 20 d) Chương trình báo lỗi Private Sub B(x As Byte, y As Byte) (5) x = x * y y = y * x End Sub Private Sub Command1_Click() Dim z As Byte z = 3 Call B(z, z) z = z * 5 Print z End Sub Câu 20. Kết quả của lệnh Print z là: a) 15 b) 45 c) 135 d) Chương trình báo lỗi Câu 21. Nếu thay dòng (5) bằng Private Sub B(x As Byte, ByVal y As Byte), kết quả của lệnh Print z là: a) 15 b) 45 c) 135 d) Chương trình báo lỗi Private Sub A(n As Byte, ParamArray x()) Sum = 0 For i = 1 To n Sum = Sum + x(i) Next i Print Sum End Sub Câu 22. Nếu ta gọi Call A(3,1,2,3,4) thì lệnh Print Sum sẽ in ra kết quả là: a) 6 b) 7 c) 9 d) Chương trình báo lỗi Câu 23. Nếu ta gọi Call A(3,5,6,7) thì lệnh Print Sum sẽ in ra kết quả là: a) 8 b) 14 c) 18 d) Chương trình báo lỗi Câu 24. Chọn phát biểu sai: a) If a>0 Then Print a ElseIf b>0 Then Print b End If End If b) If x<0 Then If b>0 Then Print a End If c) If c<0 Then If y<0 Then Print z End If End If d) If t>0 Then Print a Public Function w1(n As Integer) w1 = 2 Do w1 = w1 + (n * n - 20 * n) / (n - 20) n = n - 1 Loop Until (n <= 2) End Function Private Sub Command1_Click() Dim x1 As Integer Dim x2 As Integer x1 = 8 ‘dòng 3 x2 = w1(x1) Print x1 ‘dòng 4 Print x2 ‘dòng 5 End Sub Câu 25. Lệnh Print x1 in ra kết quả là: a) 0 b) 1 c) 2 d) 3 Câu 26. Lệnh Print x2 in ra kết quả là: a) 32 b) 33 c) 34 d) 35 Câu 27. Giả sử hàm xử lý sự kiện KeyDown được gọi và giá trị của biến Shift là 14, giá trị của biến KeyCode là vbKeyF2. Hỏi tổ hợp phím nào được nhấn: a) Shift + Ctrl + F2 b) Ctrl + Atl + F2 c) Atl + Shift + F2 d) Shift + Ctrl + Atl + F2 Câu 28. Chọn phái biểu đúng Bao đóng là che dấu mọi chi tiết hiện thực của đối tượng không cho bên ngòai thấy và truy xuất Bao đóng làm giảm tính độc lập giữa các đối tượng, nhờ đó dễ bảo trì, phát triển ứng dụng Bao đóng làm tăng tính ghép nối giữa các đối tượng Câu a và c đúng Câu 29. Khi thiết kế giao diện cho phép người dùng chọn một hoặc nhiều ca sĩ yêu thích ta sẽ dùng đối tượng giao diện nào: a) ComboBox b) CheckBox c) OptionButton d) Textbox Câu 30. Cho biết kết quả của phép dịch phải 3 bit của số 93 (thập phân): a) 52 b) 11 c) 14 d) Tất cả đều sai Câu 31. Cho biết kết quả của phép dịch phải 3 bit rồi lại dich trái 3 bit của một số 8 bit có giá trị thập phân là 75: a) 9 b) 15 c) 72 d) Tất cả đều sai Câu 32. Cho biết kết quả của phép dịch trái 3 bit rồi lại dich phải 3 bit của một số 8 bit có giá trị thập phân là 173: a) 13 b) 1384 c) 15 d) Tất cả đều sai Câu 33. Sự kiện nào sau đây là sự kiện nhấn phím ? a) Click. b) Dragdrop. c) KeyPress. d) KeyUp. Câu 34. Tham số nào dùng để phát hiện sự kiện nhấn phím CTRL a) Shift. b) KeyAscii. c) KeyCode. d) cả 3 câu đều sai. Câu 35. Sự kiện dragdrop tương đương với chuỗi sự kiện nào sau đây ? a) MouseDown – MouseMove - MouseUp. b) Click – MouseMove - Click. c) MouseMove – Click. d) Drag - Drop. Câu 36. Sự kiện nào sau đây không có tham số tọa độ chuột ? a) MouseMove. b) MouseUp. c) MouseDown. d) Click. Câu 37. Trong cú pháp của thủ tục Circle sau, tham số nào quyết định vẽ hình tròn hay ellipse ? [objName].Circle [Step] (x,y), radius, [color, start, end, aspect] a) radius. b) end. c) aspect. d) start. Câu 38. Thuộc tính nào sau đây của đối tượng xác định đơn vị vẽ ? a) ScaleHeight. b) ScaleMode. c) ScaleWidth. d) Scale Left. Đọan chương trình sau dùng cho 3 câu hỏi tiếp theo Public Sub Inso() (1) Dim x As Integer, y As Integer (2) For x = 1 To 9 (3) For y = 1 To 9 (4) If x + y = 10 Then (5) Print x * 10 + y (6) Exit For (7) End If (8) Next y (9) Next x (10) End Sub Câu 39. Đọan chương trình trên có chức năng: 1. In ra tất cả các số từ 1 đến 99 2. In ra các số hai chữ số có tổng các chữ số bằng 10 3. In ra các số từ 10 đến 99 4. Các câu a, b, c đều sai Câu 40. Nếu bỏ dòng lệnh (7) Exit For thì: 1. Kết quả in ra sẽ khác so với trước lúc chưa bỏ 2. Đọan chương trình sẽ báo lỗi cú pháp 3. Kết quả in ra không đổi nhưng thời gian chạy chương trình lâu hơn. 4. Các câu a, b, c đều sai Câu 41. Nếu thay dòng lệnh (7) bằng Exit Sub thì: 1. Kết quả sẽ in ra số 19 2. Không in ra số nào cả. 3. Kết quả in ra không thay đổi 4. Không thay thế được Câu 42. Cho biết chương trình sau sẽ in ra kết quả gì ? Public Function nnn(ByValx As Long) Dim y As Long y = x For i = 2 To y -1 x = x * i Next nnn = x End Function Private Sub Command1_Click() Print nnn(6) End Sub a) 6 b) 720 c) 120 d) Tất cả đều sai. a = 0 (1) b = 200 (2) Do While (b >= a) (3) a = a + 2 (4) b = b – 3 (5) if a = b Then Exit Do (6) Loop Print a Câu 43. Cho biết đoạn chương trình trên in ra kết quả bao nhiêu: 1. 82 2. 80 3. 78 4. Tất cả đều sai Câu 44. Nếu bỏ dòng 6 đi thì kết quả in ra bằng bao nhiêu: 1. 82 2. 80 3. 78 4. Tất cả đều sai Câu 45. Nếu thay dòng 1 bằng lệnh “ a = 11 “ thì kết quả in ra bằng bao nhiêu: 1. 87 2. 85 3. 89 4. Tất cả đều sai a = 0 b = 0 For i = 1 to 9 For j = 1 to 9 a = a + 1 b = b + 2 Next j a = a + b Next i Câu 46. Trong đoạn code trên sau khi kết thúc vòng lặp, a bằng bao nhiêu: 1. 891 2. 142 3. 584 4. Tất cả đều sai. Câu 47. Sau khi kết thúc vòng lặp, b bằng bao nhiêu: 1. 160 2. 158 3. 162 4. Tất cả đều sai. Sub A ( x As Integer, y As Integer, z As Interger) Dim i As Integer x = z + y y = z + x z = x + y + 1 End Sub Sub B () Dim m As Integer, n As Integer m = 1 : n = 2 A m,n,m (dòng 1) Print m End Sub Câu 48. Sau khi thủ tục Sub B được thực hiện, kết quả in ra màn hình là: 1. 3 2. 6 3. 10 4. Tất cả đều sai. Câu 49. Nếu thay dòng 1 bằng lệnh “A m,m,m” thì kết quả in ra màn hình là: 1. 7 2. 10 3. 9 4. Tất cả đều sai. X = “” For Each varX In Array("A", "B", "C") X = X + VarX + 1 Next varX Print X Câu 50. Kết quả in ra màn hình của đoạn code trên là 1. ABC111 2. A1B1C1 3. C1B1A1 4. CBA111 Câu 51. Trường hợp nào sau đây có thể lấy làm ví dụ cho tính bao gộp của lập trình hướng đối tượng: 1. Người sử dụng không cần biết code bên trong của các phương thức chỉ cần biết cách dùng các phương thức. 2. Một đối tượng hình chữ nhật bao gồm bốn đối tượng điểm. 3. Hình chữ nhật có tính chất gì thì hình vuông có tính chất đó. 4. Cả ba đều đúng. Câu 52. Muốn cho tập tin không bị xóa, không thể thấy thì cần có thuộc tính nào sau đây: 1. Read Only và Archive 2. Hidden và Read Only 3. Read Only 4. Hidden và Archive Đại Học Quốc Gia Tp.HCM Họ và tên:…………………… Trường Đại học Bách Khoa Tp.HCM MSSV:………………… Khoa KH & KT Máy tính @@@@@ ĐỀ KIỂM TRA CUỐI KỲ MÔN: TIN HỌC 1 ĐỀ 1 Thời gian: 90 phút (Không được phép sử dụng tài liệu) Câu 1. Chọn phát biểu đúng: a. Quá trình giải quyết một bài toán là quá trình tính toán trên tập dữ liệu của bài toán. b. Khái niệm chương trình con thể hiện ý tưởng chia để trị. c. Các biến cục bộ của module cho phép trao đổi dữ liệu giữa các module. d. Cả a và b đều đúng. Câu 2. Chọn phát biểu đúng: a. Ngôn ngữ lập trình cấu thành từ 2 yếu tố cú pháp và ngữ nghĩa. b. Ngữ nghĩa qui định trật tự kết hợp các phần tử để cấu thành câu lệnh. [...]... chữ nhật bao gồm bốn đối tượng điểm 3 Hình chữ nhật có tính chất gì thì hình vuông có tính chất đó 4 Cả ba đều đúng Câu 50 Muốn cho tập tin không bị xóa, không thể thấy thì cần có thuộc tính nào sau đây: 1 Read Only và Archive 2 Hidden và Read Only 3 Read Only 4 Hidden và Archive ... For Each varX In Array("A", "B", "C") X = X + VarX + 1 Next varX Print X Câu 48 Kết quả in ra màn hình của đoạn code trên là 1 ABC111 2 A1B1C1 3 C1B1A1 4 CBA111 Câu 49 Trường hợp nào sau đây có thể lấy làm ví dụ cho tính bao gộp của lập trình hướng đối tượng: 1 Người sử dụng không cần biết code bên trong của các phương thức chỉ cần biết cách dùng các phương thức 2 Một đối tượng hình chữ nhật bao gồm bốn... thập phân là 173: 13 1384 15 Tất cả đều sai Câu 31 Sự kiện nào sau đây là sự kiện nhấn phím ? Click Dragdrop KeyPress KeyUp Câu 32 Tham số nào dùng để phát hiện sự kiện nhấn phím CTRL Shift KeyAscii KeyCode cả 3 câu đều sai Đoạn chương trình dành cho 4 câu hỏi tiếp theo: Option Explicit Private Type Record ID As Long Name As String * 30 End Type Private Sub Form_Click() Dim MyRecord As Record, RecordNum... Câu 43 Nếu thay dòng 1 bằng lệnh “ a = 11 “ thì kết quả in ra bằng bao nhiêu: 1 87 2 85 3 89 4 Tất cả đều sai a=0 b=0 For i = 1 to 9 For j = 1 to 9 a=a+1 b=b+2 Next j a=a+b Next i Câu 44 Trong đoạn code trên sau khi kết thúc vòng lặp, a bằng bao nhiêu: 1 891 2 142 3 584 4 Tất cả đều sai Câu 45 Sau khi kết thúc vòng lặp, b bằng bao nhiêu: 1 160 2 158 3 162 4 Tất cả đều sai Sub A ( x As Integer, y As . Khoa Công Nghệ Thông Tin @@@@@ ĐỀ KIỂM TRA CUỐI KỲ MÔN: TIN HỌC 1 ĐỀ 1 Thời gian: 90 phút (Không được phép sử dụng tài liệu) Câu 1. Cho biết kết quả của đoạn code sau: I = 0 Do I. đúng. Câu 52. Muốn cho tập tin không bị xóa, không thể thấy thì cần có thuộc tính nào sau đây: 1. Read Only và Archive 2. Hidden và Read Only 3. Read Only 4. Hidden và Archive Đại Học Quốc Gia. đúng. Câu 50. Muốn cho tập tin không bị xóa, không thể thấy thì cần có thuộc tính nào sau đây: 1. Read Only và Archive 2. Hidden và Read Only 3. Read Only 4. Hidden và Archive