thuvienhoclieu com thuvienhoclieu com ĐỀ CƯƠNG GIỮA KỲ II NĂM HỌC 2022 2023 MÔN TIN HỌC 11 I PHẦN TRẮC NGHIỆM Câu 1 Trong các cú pháp sau, cú pháp nào là cấu trúc lặp? A While DO THEN ; D VAR : < Kiểu liệu>; Câu 2: Trong cú pháp lệnh sau, cú pháp thuộc cấu trúc lặp? A Var : ARRAY[Kiểu số] OF ; B FOR := TO DO ; C IF THEN ELSE ; D CONST = ; Câu 3: Cú pháp lệnh lặp với số lần chưa biết trước Chọn cấu trúc đúng? A While Do ; B White Do ; C For := To Do ; D Var = ; Câu 4: Cú pháp lệnh lặp với số lần chưa biết trước Chọn cấu trúc đúng? A For := To Do ; B For := Downto Do ; C While Do ; D While Do ; Câu 5: Trong cấu trúc While_Do, câu lệnh thực khi: A Điều kiện B Điều kiện sai C Điều kiện không xác định D Không cần kiểm tra điều kiện Câu 6: Trong cấu trúc While_Do, điều kiện ln câu lệnh thực lần? A lần B lần C n lần D vô hạn lần Câu 7: Cú pháp câu lệnh lặp với số lần biết trước Chọn cấu trúc đúng? A For := to ; B Repeat Until ; C For := to ; D While ; Câu 8: Cú pháp cấu trúc lặp For – dạng tiến là: A For := to ; B For := to ; C For := downto ; D For := downto ; Câu 9: Cú pháp cấu trúc lặp For – dạng lùi là: A For := downto ; B For := down ; C For := downto ; D For := to ; Câu 10: Kiểu liệu biến đếm cấu trúc lặp For – là: A Cùng kiểu với giá trị đầu, giá trị cuối B Chỉ cần khác kiểu với giá trị đầu C Cùng kiểu với biến câu lệnh D Không cần xác định kiểu liệu Câu 11: Trong cấu trúc lặp For – Do, biến đếm có kiểu nguyên thì: A giá trị đầu, giá trị cuối phải có kiểu nguyên B giá trị đầu, giá trị cuối có kiểu tùy ý C Giá trị đầu, giá trị cuối có kiểu thực D Giá trị đầu, giá trị cuối phải kiểu liệu đếm Câu 12: Hãy chọn phương án ĐÚNG cấu trúc lặp For – dạng tiến là: A Giá trị đầu ≤ giá trị cuối B Giá trị đầu < giá trị cuối C Giá trị đầu > giá trị cuối D Giá trị đầu = giá trị cuối Câu 13: Trong cấu trúc For – do, câu lệnh thực lần nào? A Biến đếm có giá trị đầu giá trị cuối B Biến đếm có giá trị C Biến đếm có giá trị nhỏ giá trị cuối D Câu lệnh câu lệnh ghép Câu 14: Cho chương trình sau: Begin For i:=1 to write(i:2); Readln End thuvienhoclieu.com Trang thuvienhoclieu.com Kết chương trình là? A 12345 B C iiiii D 11111 Câu 15: Cho chương trình sau: Begin For i:=1 to write(1: 2); Readln End Kết chương trình là? A 11111 B 12345 C 1 1 D i i i i i Câu 16: Cho đoạn chương trình sau: S:=0; i:=1; While .do Begin S:=S+i; i:= i+1; End; Tính tổng S= 1+2+3+ +10, điều kiện sau cần điền vào chỗ ( ) câu lệnh While do? A i 10 D i >= 10 Câu 17: Cho đoạn chương trình sau: i:= 1; While i write(N); Nhận xét chương trình trên? A Lặp vơ hạn B Chương trình in số từ đến N C Chương trình in N chữ số D Chương trình sai Câu 19: Cho đoạn chương trình sau: … N:= 0; While N then write(a[i]:4); Đoạn chương trình thực cơng việc gì? A Nhập vào dãy số liệt kê số dương B Nhập vào số N in số dương C Nhập vào dãy số liệt kê số dương chẵn D Nhập vào mảng A Câu 39: Cho khai báo mảng: Var b:array[1 100] of integer; đoạn chương trình sau: Begin Write(' Nhap so luong phan tu n='); Readln(n); For i:=1 to n Begin Write('b[', i, ']='); Readln(b[i]); End; For i:=1 to n If i mod = then write(b[i]:4); Đoạn chương trình thực cơng việc gì? A Liệt kê phần tử vị trí chẵn B In hình phần tử chẵn C In hình phần tử vị trí lẻ D Liệt kê phần tử lẻ Câu 40: Cho khai báo mảng: Var x:array[1 100] of integer; đoạn chương trình sau: Begin Write(' Nhap so luong phan tu n='); Readln(n); For i:=1 to n Begin Write(′phan tu thu′, i, ′=′); Readln(x[i]); End; For i:=1 to n write (x[i]:5); Đoạn chương trình thực cơng việc gì? A In mảng vừa nhập hình B In hình phần tử thứ i mảng X C Nhập giá trị cho phần tử mảng x D Khơng thực cơng việc Câu 41: Cho khai báo mảng: Var B:array[1 100] of byte; thuvienhoclieu.com Trang thuvienhoclieu.com đoạn chương trình sau: Begin Write(' Nhap so luong phan tu n='); Readln(n); For i:=1 to n Begin Write(′phan tu thu′, i, ′=′); Readln(B[i]); End; For i:=1 to n a If i mod Then writeln(B[i]); Đoạn chương trình thực cơng việc gì? A Liệt kê phần tử vị trí chẵn B Liệt kê phần tử vị trí lẻ C Nhập giá trị cho phần tử mảng B D In hình phần tử mảng B Câu 42: Cho khai báo mảng: Var d:array[1 100] of word; đoạn chương trình sau: Begin Write(' Nhap so luong phan tu n='); Readln(n); For i:=1 to n Begin Write(′phan tu thu′, i, ′=′); Readln(d[i]); End; T:=1; For i:=1 to n If (i mod = 0) and (d[i] mod 0) Then T:= T*d[i]; Đoạn chương trình thực cơng việc gì? A Tính tổng phần tử vị trí chẵn B Tích phần tử lẻ mảng d C Tích phần tử lẻ vị trí chẵn D Tích phần tử chẵn vị trí lẻ Câu 43: Xâu là: A mảng chiều mà phần tử kí tự B kí tự đặc biệt bảng mã ASCII C dãy kí tự số, chữ in hoa bảng mã ASCII D dãy chữ in hoa chữ thường mã ASCII Câu 44: Khái niệm xâu là: A dãy kí tự bảng mã ASCII B dãy kí tự chữ cái, chữ số C dãy hữu hạn phần tử kiểu D dãy chữ mã ASCII Câu 45: Phát biểu ĐÚNG kiểu liệu xâu? A Là dãy kí tự B Là dãy kí tự chữ C Là dãy kí tự dấu D Là dãy kí tự số Câu 46: Khai báo xâu biến xâu có độ dài lớn kiểu xâu Chọn khai báo ĐÚNG? A Var st,s:string; B Var x:string[256]; C Var s:string; D Var s:string[1 255]; Câu 47: Cú pháp để khai báo xâu? A Var :array[độ dài lớn xâu] of char; B Var = String[độ dài lớn xâu]; C Var = string; D Var : String[độ dài lớn xâu]; Câu 48: Thực yêu cầu khai báo biến xâu có độ dài 50 Chọn khai báo đúng? A Var A: string(50); B Var A: string[1 49]; C Var A: string[50]; D Var A:array[50]; Câu 49: Trong khai báo sau, khai báo dùng để khai báo kiểu xâu? A Var St:array[1 4,1 7] of char; B Var St:string[256]; C Var st:string[25]; D Var st:char; Câu 50: Chọn khai báo xâu đúng? A Var st: string; B Var st: String[266]; C Var st= string[200]; D Var st=String; Câu 51: Cho xâu X:='kiem tra'; Tham chiếu đến phần tử thứ xâu X cho kết là: A B.'' C ' ' D ‘ ’ thuvienhoclieu.com Trang thuvienhoclieu.com Câu 52: Cho xâu X:='ABCABC'; Ta viết X[4]=? A A B B C 'A' D ‘A’ Câu 53: Hãy chọn phương án ĐÚNG phép thao tác với xâu? A Ghép so sánh B Cộng, trừ, nhân, chia C Tính tốn so sánh D Cắt, dán, chép Câu 54: Hai xâu coi nhau, nào? A Khi chúng giống hoàn toàn B Khi số lượng phần tử C Khi cặp kí tự chúng giống D Khi có độ dài xâu Câu 55: Để cho kết độ dài xâu X, ta sử dụng hàm (thủ tục) nào? A Delete(x) B Pos(x) C Length(X) D Copy(x) Câu 56: Trong NNLT Pascal, hàm Length(S) cho kết là: A Độ dài xâu S B Số lượng kí tự xâu khơng tính dấu cách cuối C Độ dài tối đa xâu S khai báo D Số lượng kí tự xâu khơng tính dấu cách Câu 57: Hãy chọn phương án ĐÚNG thực thủ tục Insert(s1,s2,vt); A Chèn xâu s1 vào xâu s2 vị trí vt B Chèn xâu s2 vào xâu s1 vị trí vt C Nối xâu S1 vào xâu S2 D Sao chép vào cuối s1 phần s2 từ vị trí vt Câu 58: Hàm Pos(s1,s2) có ý nghĩa là: A Vị trí xuất xâu s1 xâu s2 B Chèn xâu s1 vào xâu s2 C Vị trí xuất xâu s2 xâu s1 D Vị trí xâu s1 s2 Câu 59: Cho xâu s:='ABCdeF'; Kết thủ tục Delete(S,3,3); là: A 'ABC' B 'deF' C 'ABF' D Lỗi cú pháp Câu 60: Cho xâu s1:='123'; xâu s2:='abcd'; Kết thủ tục Insert(s1,s2,3); là: A Thủ tục sai B '123abcd' C 'ab123cd' D 'abc123d' Câu 61: Câu lệnh sau thực cơng việc gì? For i:= Length(X) downto Write(X[i]); A Đưa xâu X theo thứ tự đảo ngược B Đưa hình xâu X C Đưa hình kí tự xâu X D Đưa hình phần tử xâu X Câu 62: Câu lệnh sau thực cơng việc gì? N:= Length(S); For i:= to N write(upcase(S[i]); A Đưa hình xâu S in hoa B Đưa hình xâu S C Đưa hình in hoa kí tự cuối xâu S D Đưa hình in hoa kí tự thứ i xâu S Câu 63: Cho khai báo Var st: string[100]; Đoạn chương trình sau thực cơng việc gì? For i:= length(st) downto If S[i]= ' ' then Delete(st,i,1); A Xố hết kí tự trắng có xâu st B Xố kí tự trắng có xâu st C Xố kí tự trắng cuối xâu st D Xố kí tự trắng thừa xâu st Câu 64: Đoạn chương trình sau thực cơng việc gì? d:=0; For i:= to length(st) If st[i] = 'A' then d:=d+1; A Đếm số kí tự A có xâu st B Xố kí tự A có xâu st C Đếm số kí tự có xâu st D Xố kí tự có xâu st Câu 65: Đoạn chương trình sau thực cơng việc gì? N:= length(A); For i:= to N If A[i] = a then A[i]:= upcase(A[i]); A In hoa tất kí tự a B In hoa xâu A C In hoa kí tự thứ i xâu D Chuyển chữ hoa thành chữ thường Câu 66: Cho khai báo Var S: string[100]; Đoạn chương trình sau làm cơng việc gì? Dem:=0; N:=length(S): For i:= to N If (S[i] = A′) or (S[i]=′B′ then dem:=dem+1; A Số lượng kí tự A B có xâu S B Số lượng kí tự A kí tự B có xâu S C Số lượng kí tự A có xâu S D Số lượng kí tự B có xâu S II PHẦN TỰ LUẬN: Câu 1: Viết chương trình có sử dụng cấu trúc lặp (While For) thuvienhoclieu.com Trang thuvienhoclieu.com Câu 2: Lập trình có sử dụng kiểu mảng kiểu xâu III PHẦN THỰC HÀNH: Lập trình máy Xem lại tập sửa kiểu mảng kiểu xâu PHẦN TRẮC NGHỆM A A 17 B 25 A 33 D 41 B 49 C 57 A 65 A B 10 A 18 A 26 B 34 C 42 C 50 A 58 A 66 A A 11 A 19.A 27 A 35 C 43 A 51 C 59 C 4.C 12 A 20 A 28 B 36 B 44 A 52 C 60 C A 13 A 21 A 29 B 37 A 45 A 53 A 61 A thuvienhoclieu.com D 14.B 22 A 30 A 38 A 46 C 54.A 62.A A 15 C 23 A 31 B 39 A 47 D 55 C 63 A 8.A 16 A 24 A 32 C 40.A 48 C 56 A 64 A Trang