Tham chiếu tới phần tử của mảng một chiều được xác định bởi tên biến mảng và chỉ số phần tử của mảng được viết trong cặp dấu ngoặc ( và )?. Tham chiếu tới phần tử của mảng một chiều đượ[r]
(1)SỞ GIÁO DỤC & ĐÀO TẠO AN GIANG TRƯỜNG THPT UNG ĂN KHIÊM
ĐỀ THI HỌC KỲ II Môn: TIN HỌC _ KHỐI 11
Thời gian làm bài: 45 phút; (28 câu trắc nghiệm) ĐỀ SỐ 1:
I TRẮC NGHIỆM (7đ)
Câu 1: Trong Pascal để đóng tệp ta dùng thủ tục
A Close(<biến tệp>); B Stop(<biến tệp>); C Close(<tên tệp>); D Stop(<tên tệp>); Câu 2: Khai báo Var a: array[1 10] of Integer Trong câu lệnh sau, lệnh bị lỗi:
A a[4]:= a[1] - a[2]; B a[1]:=5; C a[2]:= a[1]+1; D a[12]:=1; Câu 3: Mảng kiểu liệu:
A Đơn giản B Phức tạp C Có cấu trúc D Đa cấu trúc Câu 4: Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau đưa hình kết gì? (Phần khai báo kết thúc chương trình xem viết đầy đủ)
For i:=10 to downto Write(i, ‘ ’);
A Đưa 10 dấu cách B 10 C 10 D Không đưa kết Câu 5: Để gắn tên tệp cho biến tệp ta sử dụng câu lệnh:
A assign(<tên tệp>,<biến tệp>); B <tên tệp> := <biến tệp>; C <biến tệp> := <tên tệp>; D assign(<biến tệp>,<tên tệp>);
Câu 6: Trong ngôn ngữ lập trình pascal, thủ tục chèn xâu S1 vào xâu S2 vị trí vt ta viết:
A Insert(S1, S2, vt); B Insert(vt, S1, S2); C Insert(S1, vt, S2); D Insert(S2, S1, vt); Câu 7: Kết việc thực hàm pos(‘ab’, ‘defbcad’) :
A B C D
Câu 8: Tham chiếu đến phần tử mảng chiều xác định ?
A Dấu [ ] B Dấu < > C Dấu ( ) D Dấu “ “ Câu 9: Trong khai báo sau, khai báo đúng?
A Var ho = string(30); B Var diachi : string(100); C Var ten = string[30]; D Var hoten: string[27]; Câu 10: Kiểu liệu phần tử có mảng :
A Có kiểu kiểu số nguyên B Kiểu liệu có cấu trúc C Có kiểu liệu D Mỗi phần tử có kiểu Câu 11: Cú pháp khai báo cấu trúc lặp dạng lùi với số lần lặp biết trước là:
A For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>;
B For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> <câu lệnh>; C For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> <câu lệnh>; D For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>; Câu 12: Trong phát biểu sau, phát biểu Sai?
A Xâu có chiều dài không vượt 250;
(2)C Xâu khơng có kí tự gọi xâu rỗng; D Có thể tham chiếu đến kí tự xâu
Câu 13: Cho st1:= ‘abc’; st2:=‘deft’ Kết gọi insert(st2,st1,3):
A ‘abcfted’ B ‘eftcabd’ C ‘abdeftc’ D ‘abcdeft’ Câu 14: Trong ngơn ngữ lập trình Pascal, (chọn câu đúng)
A Các phần tử mảng chiều không theo thứ tự
B Các phần tử mảng chiều thứ tự theo giá trị tăng dần C Các phần tử mảng chiều thứ tự theo số
D Các phần tử mảng chiều thứ tự theo giá trị giảm dần
Câu 15: ‘hoc’ +‘Tin’ thực phép ghép xâu cho kết gì?
A ‘hocTin’ B ‘Tin hoc’ C ‘hoc Tin’ D ‘Tinhoc’ Câu 16: Trong ngơn ngữ lập trình Pascal, phát biểu sau với câu lệnh rẽ nhánh if…then…?
A Nếu sau then muốn thực nhiều câu lệnh câu lệnh phải đặt hai cặp dấu ngoặc nhọn; B Nếu sau then muốn thực nhiều câu lệnh câu lệnh phải đặt hai dấu ngoặc đơn; C Nếu sau then muốn thực nhiều câu lệnh câu lệnh phải đặt Begin End D Nếu sau then muốn thực nhiều câu lệnh câu lệnh phải đặt Begin End ; Câu 17: Cú pháp để khai báo mảng chiều trực tiếp là:
A Var <tên biến mảng>: array [kiểu số] of <kiểu phần tử>; B Const <tên biến mảng>: array [kiểu số] of <kiểu phần tử>; C Var <tên biến mảng>: array [kiểu phần tử] of < kiểu số >; D Var <tên biến mảng>: array [kiểu số] : <kiểu phần tử>; Câu 18: Mở tệp f để đọc liệu ta sử dụng lệnh sau đây:
A Rewrite(f); B Read(f); C Reset(f) D Reset(f); Câu 19: Trong pascal mở tệp để ghi kết ta sử dụng thủ tục:
A Reset(<tên biến tệp>); B Rewrite(<tên biến tệp>); C Rewrite(<tên tệp>); D Reset(<tên tệp>);
Câu 20: Phát biểu đúng:
A Tham chiếu tới phần tử mảng chiều xác định tên biến mảng số phần tử mảng viết cặp dấu ngoặc ( )
B Tham chiếu tới phần tử mảng chiều xác định tên biến mảng số phần tử mảng
C Tham chiếu tới phần tử mảng chiều xác định tên biến mảng số phần tử mảng viết cặp dấu ngoặc [ ]
D Tham chiếu tới phần tử mảng chiều xác định tên biến mảng kiểu phần tử mảng
Câu 21: Hàm EOF(<biến tệp>) có giá trị
A TRUE trỏ tệp cuối tệp B FALSE trỏ tệp cuối dòng C Là số nguyên D TRUE trỏ tệp cuối dòng Câu 22: Mảng chiều là:
(3)C Dãy hữu hạn phần tử khác kiểu D Dãy vô số phần tử kiểu Câu 23: Khai báo sau đúng:
A Var mang1= Array[1 100] of Real; B Var mang1: Array[‘1’ ‘7’] of byte; C Var nhietdo : array[1…365] of integer;
D Const N=1.2; Var mang1 : Array[1 n] of Integer;
Câu 24: Cho st:=‘chuc cac ban may man’,kết hàm length(st) là:
A 16 B 18 C 20 D 22
Câu 25: Trong ngơn ngữ lập trình pascal, thủ tục Delete(st, vt, n) thực cơng việc cơng việc sau:
A Xóa xâu n, St ký tự vị trí vt B Xóa xâu vt, n ký tự vị trí st C Xóa xâu st, n ký tự vị trí vt D Xóa xâu ký tự st, vt ký tự vị trí n
Câu 26: Trong ngơn ngữ lập trình Pascal, hàm Length(S) cho kết ?
A Số ký tự có xâu S khơng tính khoảng cách; B Số ký tự có xâu S;
C Số ký tự xâu không tính dấu cách cuối cùng; D Độ dài xâu S khai báo;
Câu 27: Trong ngôn ngữ lập trình pascal, thủ tục Insert(S1, S2, n) thực cơng việc ?
A Chèn thêm xâu S2 vào xâu S1 vị trí n xâu S2; B Chèn thêm xâu S2 vào xâu S1 vị trí n xâu S1; C Chèn thêm xâu S1 vào xâu S2 vị trí n xâu S1; D Chèn thêm xâu S1 vào xâu S2 vị trí n xâu S2;
Câu 28: Trong ngơn ngữ lập trình Pascal, câu lệnh sau ?
A If <biểu thức logic> ; then <câu lệnh> ; B If <biểu thức logic> then <câu lệnh> ; C If <biểu thức logic> then <câu lệnh > D If <biểu thức logic> ; then <câu lệnh> II TỰ LUẬN
Câu 1:(2đ) Hãy điền vào chỗ trống đoạn chương trình sau đây:Nhập xâu từ bàn phím kiểm tra kí tự xâu thứ có trùng với kí tự cuối xâu thứ hai không?
Program vd1; Uses crt;
Var {1}……… X:byte;
Begin
Write(‘Nhap vao xau thu 1:’); {2}………
Write(‘{3}……….:’) Readln(s2);
X:=length(s2);
(4)Write(‘Trung ’) {5}………
{6}………(‘khac nhau’); {7}………
{8}………
Câu 2: (1đ) Hãy cho biết kết sau thực chương trình sau đây:
Program mangmotchieu; Var M:array[1 10] of integer;
i:byte; Begin
For i:=1 to 10 M[i]:=i;
For i:=1 to 10
Write(M[5]:2, M[7]:2, M[9]:2); End
ĐỀ SỐ 2:
I TRẮC NGHIỆM (7đ)
Câu 1: Để khai báo kiểu xâu trực tiếp ta sử dụng cú pháp nào? A Var <tên biến> = <tên kiểu>;
B Var <tên biến> : <tên kiểu> ;
C Var <tên biến> = String[độ dài lớn xâu]; D Var <tên biến>: String[độ dài lớn xâu] ; Câu 2: Để gắn tệp KQ.DAT cho biến tệp f1 ta sử dụng câu lệnh
A Assign(f1,‘KQ.DAT’); B KQ.TXT := f1; C Assign(‘KQ.DAT’,f1); D F1 := ‘KQ.DAT’; Câu 3: Đoạn lệnh sau thực cơng việc gì?( A mảng số có N phần tử)
S:=0; For i:=1 to N S:= S +A[i];
A Tính tổng giá trị i B Đếm số phần tử mảng A C Đếm giá trị i mảng A D Tính tổng phần tử mảng A Câu 4: Kết việc thực hàm pos(‘ab’, ‘deabcab’) :
A B C D
Câu 5: Cú pháp khai báo cấu trúc lặp dạng tiến với số lần lặp biết trước là:
A For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> <câu lệnh>; B For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> <câu lệnh>; C For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>; D For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>; Câu 6: Mảng chiều là:
(5)Câu 7: Cho xâu s=‘abcdefghi’ sau thực thủ tục delete(s,3,4) thì:
A s=‘abghi’ B s=’abchi’ C s=” D s=’abcdi’
Câu 8: Trong khai báo đây, khai báo sai: A var ARRAYinteger : array [1 100] of integer; B var Logic : array [1….9] of char;
C var ARRAYREAL : array [10 20] of real; D var Logic : array [1 9] of boolean;
Câu 9: Hãy chọn phương án ghép Với cấu trúc rẽ nhánh IF <điều kiện> THEN <câu lệnh 1> ELSE <câu lệnh 2>, câu lệnh 2 thực
A Biểu thức điều kiện câu lệnh 1 thực xong; B Biểu thức điều kiện đúng;
C Biểu thức điều kiện sai; D Câu lệnh 1 thực hiện;
Câu 10: Trong ngơn ngữ lập trình, mặt cú pháp câu lệnh sau đúng?
A Var chieu : array (1 100] of char; B Var mang : array [1-100] of char; C Var 1chieu : array [1…100] of char; D Var mang:array [1 100] of char; Câu 11: Trong Pascal, để khai báo biến tệp văn ta sử dụng cú pháp:
A Var <tên biến tệp> : text; B Var <tên biến tệp>: string; C Var <tên tệp> : text; D Var <tên tệp>: string; Câu 12: Cách khai báo mảng chiều sau cách ?
A Var <Tên biến mảng> array[kiểu số] of <kiểu phần tử>; B Var <Tên biến mảng>; array[kiểu số] of <kiểu phần tử>; C Var <Tên biến mảng>:array[kiểu số] of <kiểu phần tử>; D <Tên biến mảng>:array[kiểu số] of <kiểu phần tử>;
Câu 13: Trong ngôn ngữ lập trình pascal, khai báo khai báo sau sai khai báo xâu kí tự?
A S:String[256]; B S: String; C X1: string[100]; D Var cba: string[1];
Câu 14: Trong ngơn ngữ lập trình Pascal, đoạn chương trình sau đưa hình kết gì? (Phần khai báo kết thúc chương trình xem viết đầy đủ)
For i:=1 to 10 Write(i, ‘ ’);
A 10 B 10 C Không đưa kết D Đưa 10 dấu cách Câu 15: Kết thực hàm copy(‘abcdef’, 3,2):
A ‘ef’ B ‘cd’ C ‘df’ D ‘ab’
Câu 16: Trong pascal mở tệp để đọc liệu ta sử dụng thủ tục:
A Reset(<tên biến tệp>) ; B Reset(<tên tệp>) ; C Rewrite(<tên biến tệp>) ; D Rewrite(<tên tệp>) ; Câu 17: Cho st:= ‘abcde’ Kết gọi thủ tục delete(st,2,3):
(6)A Xâu rỗng B Xâu trắng C Không phải xâu D Xâu không Câu 19: Cho xâu st:= 'chuc mung nam moi !', chọn giá trị tham chiếu đúng:
A st[6]= ‘ '; B st[6]= 'm'; C st[6]= 'c'; D st[6]= 'u'; Câu 20: Trong câu lệnh lặp với số lần biết trước, dạng lặp tiến giá trị đầu biến đếm phải………… giá trị cuối
A Lớn B Lớn C Nhỏ D Nhỏ Câu 21: Số phần tử mảng là:
A Có 1000 phần tử B Vơ hạn C Có giới hạn D Có n phần tử Câu 22: Trong Pascal, đểkhai báo hai biến tệp văn f1, f2 ta viết:
A var f1.txt, f2.txt; B var f1,f2 : text; C var f1,f2 : txt; D var f1.txt; f2.txt; Câu 23: Để đọc liệu từ tệp văn ta sử dụng thủ tục:
A Read(<tên biến tệp>,<danh sách biến>);
B Write(<tên tệp>,<danh sách biến>);
C Write(<tên biến tệp>,<danh sách biến>);
D Read(<tên tệp>,<danh sách biến>);
Câu 24: Trong ngơn ngữ lập trình Pascal, câu lệnh sau ?
A If <biểu thức logic> ; then <câu lệnh> ; B If <biểu thức logic> ; then <câu lệnh> C If <biểu thức logic> then <câu lệnh > D If <biểu thức logic> then <câu lệnh>; Câu 25: Mảng chiều là:
A Dãy phần tử khác kiểu nha B Dãy hữu hạn phần tử khác kiểu C Dãy hữu hạn phần tử kiểu D Dãy vơ số phần tử kiểu Câu 26: Vị trí trỏ tệp sau lời gọi thủ tục Reset
A Nằm tệp B Nằm cuối tệp
C Nằm ngẫu nhiên vị trí D Nằm đầu tệp Câu 27: Xét theo cách truy cập, tệp chia thành:
A Tệp văn tệp truy cập B Tệp văn tệp truy cập trực tiếp C Tệp truy cập trực tiếp tệp truy cập D Tệp văn tệp có cấu trúc Câu 28: Trong ngơn ngữ lập trình, mặt cú pháp câu lệnh sau đúng?
A Var chieu : array (1 100] of char; B Var mang : array [1-100] of char; C Var 1chieu : array [1 100] of char; D Var mang::array [1…100] of char; II TỰ LUẬN
Câu 1:(2đ) Hãy điền vào chỗ trống đoạn chương trình sau đây: Viết chương trình nhập vào mảng chiều số nguyên, đếm số phần tử có giá trị dương tính tổng số chúng
Program vd7; Uses crt;
Var {1}……… N,I,d,s: integer; Begin
Write(‘Nhap vao phan tu cua day:’); {2}………
(7)Begin
Write(‘A[‘,i,’]: ’); readln(A[i]); end;
{Đếm số phần tử dương(>0) tính tổng (s)} d:=0; s:=0;
for i:=1 to n if A[i]>0 then begin
d:={4}……… s:={5}……… end;
writeln(‘Số phần tử dương là: ’, {6}……);
{7}……… (‘Tổng phần tử dương là: ’, s); {8}………
End
Câu 2: (1đ) Hãy cho biết kết sau thực chương trình sau đây:
Program mangmotchieu; Var a:array[1 10] of integer;
i:byte; Begin
For i:=1 to 10 A[i]:=I;
For i:=1 to 10 If a[i] mod = then Write(a[i]:2);
(8)Website HOC247 cung cấp môi trường học trực tuyến sinh động, nhiều tiện ích thơng minh, nội dung giảng biên soạn công phu giảng dạy giáo viên nhiều năm kinh nghiệm, giỏi kiến thức chuyên môn lẫn kỹ sư phạm đến từ trường Đại học trường chuyên danh tiếng
I.Luyện Thi Online
-Luyên thi ĐH, THPT QG: Đội ngũ GV Giỏi, Kinh nghiệm từ Trường ĐH THPT danh tiếng
xây dựng khóa luyện thi THPTQG mơn: Tốn, Ngữ Văn, Tiếng Anh, Vật Lý, Hóa Học Sinh Học
-Luyện thi vào lớp 10 chun Tốn: Ơn thi HSG lớp luyện thi vào lớp 10 chuyên Toán trường PTNK, Chuyên HCM (LHP-TĐN-NTH-GĐ), Chuyên Phan Bội Châu Nghệ An trường Chuyên khác TS.Trần Nam Dũng, TS Pham Sỹ Nam, TS Trịnh Thanh Đèo Thầy Nguyễn Đức Tấn.
II.Khoá Học Nâng Cao HSG
-Toán Nâng Cao THCS: Cung cấp chương trình Tốn Nâng Cao, Tốn Chun dành cho em HS
THCS lớp 6, 7, 8, yêu thích mơn Tốn phát triển tư duy, nâng cao thành tích học tập trường đạt điểm tốt kỳ thi HSG
-Bồi dưỡng HSG Toán: Bồi dưỡng phân mơn Đại Số, Số Học, Giải Tích, Hình Học Tổ Hợp dành
cho học sinh khối lớp 10, 11, 12 Đội ngũ Giảng Viên giàu kinh nghiệm: TS Lê Bá Khánh Trình, TS Trần Nam Dũng, TS Pham Sỹ Nam, TS Lưu Bá Thắng, Thầy Lê Phúc Lữ, Thầy Võ Quốc Bá Cẩn đơi HLV đạt thành tích cao HSG Quốc Gia
III.Kênh học tập miễn phí
-HOC247 NET: Website hoc miễn phí học theo chương trình SGK từ lớp đến lớp 12 tất
các môn học với nội dung giảng chi tiết, sửa tập SGK, luyện tập trắc nghiệm mễn phí, kho tư liệu tham khảo phong phú cộng đồng hỏi đáp sôi động
-HOC247 TV: Kênh Youtube cung cấp Video giảng, chuyên đề, ôn tập, sửa tập, sửa đề thi miễn phí từ lớp đến lớp 12 tất mơn Tốn- Lý - Hố, Sinh- Sử - Địa, Ngữ Văn, Tin Học Tiếng Anh
Vững vàng tảng, Khai sáng tương lai
Học lúc, nơi, thiết bi – Tiết kiệm 90%
Học Toán Online Chuyên Gia
- - - - -