D. Lời gọi hàm và lời gọi thủ tục có thể có tham số thực sự hoặc không có tham số thực sự tuỳ thuộc vào từng hàm và thủ tục. Khi thực hiện thủ tục.. Biến cục bộ l{ biến chỉ được dùng tr[r]
Trang 1ĐỀ KIỂM TRA HỌC KỲ 2 NĂM 2017-2018
MÔN TIN HỌC LỚP 11
Thời gian: 45 phút
TRẮC NGHIỆM:
Câu 1:
Khai b|o n{o sau đ}y l{ đúng cú ph|p ?
A Type mang1c = array (1 100) of byte;
B Type mang1c = array [1 100] of byte;
C Type mang1c = array [1-100] of byte;
D Type 1mang = array [1 100] of byte;
Câu 2:
Cho khai báo sau:
var a,b:string;
Đ|p |n n{o sau đ}y l{ đúng
A Đ}y l{ khai b|o một chuỗi vô số kí tự
B Đ}y l{ khai b|o một chuỗi gồm 200 kí tự
C Đ}y l{ khai b|o một mảng 1 chiều
D Đ}y l{ khai b|o một chuỗi gồm 255 kí tự
Câu 3:
Cho c}u lệnh sau
Begin
Write('Phan tu thu',i,'=');
readln(A[i]);
end;
C}u lệnh trên l{m gì?
A Nhập v{o i phần tử của mảng A
B Xuất ra m{n hình gồm i phần tử của mảng A
C Nhập v{o vị trí thứ i của mảng A
D Xuất ra m{n hình vị trí trong mảng A
Câu 4:
Để xuất một mảng A vừa nhập v{o từ b{n phím ta thự hiện lệnh n{o sau đ}y
A Write(A[i]:4); B read(A[i]); C Write('A[i]:4') D readln(A[i]);
Câu 5:
Cho c}u đoạn lệnh sau
For i= 2 to N do
if A[i]>max the
Begin
Max=A[i];
Csmax=i;
end;
Đoạn lệnh trên sai ở chỗ n{o?
A Vòng lặp For B lệnh g|n = C Lệnh If
Trang 2for j:= 1 to n do write(A[i,j]);
writeln;
end;
for j:= 1 to n do write('A[i,j]');
writeln;
end;
C For i =1 to n do
Begin
for j= 1 to n do write(A[i,j]);
writeln;
end;
D For i :=1 to n do for j:= 1 to n do write(A[i,j]);
writeln;
Câu 8:
Cho c|c khai b|o sau, đ}u l{ khai b|o đúng về một mảng 2 chiều?
A type mang2c := array[1 9:1 8] of integer;
var A,B:mang2c;
B type mang2c = array[1 9,1 8] of integer;
var A,B:mang2c;
C var A,B:mang2c;
D type mang2c := array[1 9,1 8] of integer;
var A,B:mang2c;
Câu 9:
Cho một mảng A có 15 dòng v{ 13 cột, để in ra m{n hình phần tử dòng 7, cột 5 ta viết:
A Write(A[7,5]); B Write(A[5,7]); C Write(A:7:5); D Write(A,7,5);
Câu 10:
C|ch khai b|o n{o sau đ}y l{ đúng về mảng một chiều
A Type Mang = array[1 10] of integer;
var Mang: A; B Type Mang = array[1 10] of integer; var A:Mang;
C Type Mang:=array[1 10] of integer;
var A: Mang; D Type Mang = array[1 10] of integer; var A:Mang;
TỰ LUẬN:
Em hãy viết chương trình ho{n chỉnh nhập v{o một mảng 1 chiều v{ xuất ra m{n
hình mảng vừa nhập, biết rằng c|c phần tử trong mảng l{ c|c số nguyên
Trang 3ĐỀ KIỂM TRA HỌC KỲ 2 NĂM HỌC 2017-2018 MÔN TIN - LỚP 11 - THỜI GIAN 45 PHÚT
HỌ TÊN HS: ……….LỚP:………
I TRẮC NGHIỆM
Câu 1 Cho biết giá trị lưu trữ của biến N sau đoạn chương trình sau:
N := pos ('XYZ' , 'ABXYXY');
Câu 2 Ke t qua cu a đoa n le nh sau la g ?
s := 'ABCED'; write (s[4]);
Câu 3 Gia ma ng 2 chie u
A =array[1 2,1 3] of byte là:
Le nh Pascal write(a[1,3]); se vie t ra ma n h nh gia tri na o?
Câu 4 Cho biết giá trị lưu trữ của biến s sau đoạn chương trình sau:
s := 'XY'; insert('AB',s,1);
A 'AXYB' B 'ABXY';
C 'XYAB' D 'XABY'
Câu 5 Gia sư 4 so tư nhiên 1,2,3,4 đa đươ c lưu trư theo thư tư va o ma ng A, ba t đa u la A[1]
Đoa n le nh Pascal sau đ}y se vie t ra ca c gia tri na o (theo thư tư )?
for i:= 1 to 3 do
Trang 4C SAIDUNG D DUNG
Câu 7 Giả sử cần khai báo biến để lưu trữ năm sinh (4 chữ số) của 30 học sinh trong một
lớp Ta chọn khai b|o n{o sau đ}y la th ch hơ p nha t?
A var namsinh : array [1 30] of byte;
B var namsinh : array [1 30] of integer;
C var namsinh : array [1 40] of integer;
D var namsinh : array [1 40] of byte;
Câu 8 Ma ng la g ?
A Mo t ta p hơ p ca c bie n được gắn chỉ số, co cu ng kie u dư lie u
B Mo t phương tie n giao thông thuy thô sơ
C Một dãy các số nguyên liên tiếp
D Ca c bie n co cu ng kie u dư lie u
Câu 9 Cho mảng a[1 4] chứa 4 phần tử theo thứ tự: 3 4 5 6
Lệnh : write('a[3]') in gì ra màn hình:
Câu 10 Cho biết kết quả của đoạn chương trình sau:lop:='Lop11L2'; delete(lop,2,3);
write(lop);
II/ PHẦN CHƯƠNG TRÌNH:
Viết một chương trình nhập n nguyên dương v{ n số nguyên a1, a2,…,an
a/ Tính tổng các số chẵn của dãy (In kết quả trên một dòng)
b/ In các số của dãy nằm ở vị trí chẵn (2,4, 6…) ra màn hình (trên 1 dòng )
Trang 5ĐỀ KIỂM TRA HỌC KỲ 2 NĂM HỌC 2017-2018 MÔN TIN - LỚP 11 - THỜI GIAN 45 PHÚT
PHẦN I : TRẮC NGHIỆM (5 điểm)
Chọn đáp án đúng và điền vào bảng tương ứng dưới đây
Đáp án
Câu 1: Khẳng định nào sau đ}y l{ đúng?
A Chỉ có thủ tục mới có thể có tham số hình thức
B Cả thủ tục v{ h{m đều có thể có tham số hình thức
C Chỉ có hàm mới có thể có tham số hình thức
D Thủ tục v{ h{m n{o cũng phải có tham số hình thức
Câu 2: Để biết con trỏ tệp đ~ ở cuối dòng của tệp f hay chưa, ta sử dụng hàm:
Câu 3: Khẳng định n{o sau đ}y l{ đúng?
A Cả lời gọi hàm và lời gọi thủ tục đều phải có tham số thực sự
B Lời gọi thủ tục nhất thiết phải có tham số thực sự còn lời gọi hàm không nhất thiết phải
có tham số thực sự
C Lời gọi hàm nhất định phải có tham số thực sự còn lời gọi thủ tục không nhất thiết phải có
tham số thực sự
D Lời gọi hàm và lời gọi thủ tục có thể có tham số thực sự hoặc không có tham số thực sự
tuỳ thuộc vào từng hàm và thủ tục
Câu 4: Trong NNLT Pascal, khai b|o n{o sau đ}y l{ đúng khi khai b|o tệp văn bản?
A Var f: String; B Var f: byte; C Var f = record D Var f: Text;
Câu 5: Giả sử trên thư mục gốc của đĩa C có tệp f đ~ có nội dung sẵn Khi thực hiện thủ tục
Trang 6Câu 6: Câu lệnh dùng thủ tục đọc có dạng:
A Read(<biến tệp>); B Read(<biến tệp>,<danh sách biến>);
C Read(<danh sách biến>, <biến tệp>); D Read(<danh sách biến>);
Câu 7: Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 <> 0 then write(g, i);
Close(g);
Readln
End
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A 2; 4; 6; 8;10 B 1; 3; 5; 9
C 1; 3; 5;7; 9 D 4; 6; 8;10
Câu 8: Tệp f có dữ liệu để đọc 3 giá trị trên từ tệp f và ghi các giá trị này vào 3
biến x, y, z ta sử dụng câu lệnh:
A Read(f, x, y, z); B Read(f, ‘x’, ‘y’, ‘z’); C Read(x, y, z); D Read(‘x’, ‘y’, ‘z’);
Câu 9: Giả sử a = 5; b = 9; c = 15; để ghi các giá trị trên vào tệp f có dạng là ta sử
dụng thủ tục ghi:
A Write(f, a,b,c); B Write(a, ‘ ’, b, ‘ ’, c);
C Write(f, a, ‘ ’, bc); D Write(f, a ‘’, b‘’, c);
5 9 15
5 9 15
Trang 7Câu 10: Khẳng định n{o sau đ}y l{ đúng?
A Biến cục bộ l{ biến chỉ được dùng trong chương trình chính
B Biến cục bộ l{ biến chỉ được dùng trong chương trình con chứa nó
C Biến cục bộ l{ biến được dùng trong chương trình con chứa nó v{ trong chương trình chính
D Biến to{n cục chỉ được sử dụng trong chương trình chính v{ không được sử dụng trong c|c chương trình con
PHẦN II: TỰ LUẬN (5 điểm):
Câu 1: Cho chương trình sau
Program Baitap;
Var x, y, z , t: word;
Function BCNN(a, b:word):word;
Var du, c, d:word;
Begin
c:=a; d:=b;
While b<>0 do
Begin
du:=a mod b;
a:=b;
b:=du;
End;
BCNN:=(c*d) div a;
End;
Begin
Write(‘nhap 4 so x, y, z, t: ‘); readln(x, y, z, t);
Trang 8b) Nêu tên các biến cục bộ, biến toàn cục?
Câu 2: Cho mảng A gồm N phần tử thuộc kiểu nguyên (N≤50)? Viết chương trình con thực
hiện các yêu cầu sau:
a) Viết thủ tục nhập giá trị cho mảng A từ bàn phím
b) Viết thủ tục in ra màn hình các phần tử âm trong mảng A
ĐÁP ÁN VÀ THANG ĐIỂM ĐỀ KIỂM TRA HỌC KỲ II PHẦN I : TRẮC NGHIỆM (5 điểm)
Điểm 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
PHẦN II: TỰ LUẬN (5 điểm):
Câu 1: (2 điểm)
a) Tham số thực sự: x, y, z, t
Tham số hình thức: a, b
b) Biến cục bộ: du, c, d
Biến toàn cục: x, y, z, t
Câu 2: (3 điểm)
a) Viết thủ tục nhập giá trị cho mảng A từ bàn phím
procedure nhap(var A:kmang; var n:integer);
begin
write(‘Nhap so phan tu cua mang N=’);
readln(n);
for i:=1 to n do
begin
write(‘Nhap phan tu thu A[‘,i,’]=’);
Trang 9readln(A[i]);
end;
end;
b) Viết thủ tục in ra màn hình các phần tử âm trong mảng A
procedure hienam(A:kmang;n:byte);
begin
for i := 1 to n do
if A[i] < 0 then write(A[i],’ ’);
end;
Trang 10Website HOC247 cung cấp một môi trường học trực tuyến sinh động, nhiều tiện ích thông minh, nội dung bài giảng được biên soạn công phu và giảng dạy bởi những giáo viên nhiều năm kinh nghiệm, giỏi về kiến thức chuyên môn lẫn kỹ năng sư phạm đến từ c|c trường Đại học và cá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ừ c|c Trường ĐH v{ THPT danh tiếng xây dựng các khóa luyện thi THPTQG các môn: Toán, Ngữ Văn, Tiếng Anh, Vật Lý, Hóa Học và Sinh Học
- Luyện thi vào lớp 10 chuyên Toán : Ôn thi HSG lớp 9 và luyện thi vào lớp 10 chuyên Toán các
trường PTNK, Chuyên HCM (LHP-TĐN-NTH-GĐ), Chuyên Phan Bội Châu Nghệ An v{ c|c trường Chuyên khác cùng TS.Trần Nam Dũng, TS Pham Sỹ Nam, TS Trịnh Thanh Đèo và Thầy Nguyễn Đức Tấn
II Khoá Học Nâng Cao và HSG
- Toán Nâng Cao THCS: Cung cấp chương trình To|n N}ng Cao, To|n Chuyên dành cho các em HS THCS lớp 6, 7, 8, 9 yêu thích môn Toán phát triển tư duy, n}ng cao th{nh tích học tập ở trường v{ đạt điểm tốt
ở các kỳ thi HSG
- Bồi dưỡng HSG Toán: Bồi dưỡng 5 phân môn Đại Số, Số Học, Giải Tích, Hình Học và Tổ Hợp dành cho
học sinh các 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 cùng đô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í các bài học theo chương trình SGK từ lớp 1 đến lớp 12 tất cả các
môn học với nội dung bài giảng chi tiết, sửa bài tập SGK, luyện tập trắc nghiệm mễn phí, kho tư liệu tham khảo phong phú và cộng đồng hỏi đ|p sôi động nhất
- HOC247 TV: Kênh Youtube cung cấp các Video bài giảng, chuyên đề, ôn tập, sửa bài tập, sửa đề thi miễn
phí từ lớp 1 đến lớp 12 tất cả các môn Toán- Lý - Hoá, Sinh- Sử - Địa, Ngữ Văn, Tin Học và Tiếng Anh
Học mọi lúc, mọi nơi, mọi thiết bi – Tiết kiệm 90%
Học Toán Online cùng Chuyên Gia
HOC247 NET cộng đồng học tập miễn phí HOC247 TV kênh Video bài giảng miễn phí