1 (Tuần 27, Tiết 45 Lớp 11C) Ngày soạn 04 /03/08 KIỂM TRA 1 TIẾT (45 phút) A Mục tiêu đánh giá Đánh giá kiến thức kĩ năng của HS về Các dữ liệu tệp, chương trình con Biết cách khai báo các kiểu dữ liệ[.]
Trang 1(Tuần 27, Tiết 45:Lớp 11C) Ngày soạn: 04 /03/08
KIỂM TRA 1 TIẾT (45 phút)
A- Mục tiêu đánh giá:
- Đánh giá kiến thức kĩ năng của HS về:
- Các dữ liệu tệp, chương trình con
- Biết cách khai báo các kiểu dữ liệu tệp,
- Phân biệt được thủ tục và hàm.
- Phân biệt được các tham số hình thức, tham số thực sự, tham trị, tham biến, biến cụ bộ, biến toàn cục.
B- Mục đích, yêu cầu của đề:
- Về kiến thức:
Cách khai báo kiểu tệp
Các hàm, thủ tục liên quan đến tệp
Vân dụng chương trình con và kiểu tệp viết chương trình giải bài toán
- Về kĩ năng:
Nhận biết khai báo đúng/ sai về tệp
Hiểu các thủ tục/ hàm về xâu
Đọc hiểu chương trình
Vận dụng: Cách tổ chức dữ liệu và các câu lệnh đã học để viết chương trình giải các bài toán.
C Đáp án:
I Phần trắc nghiệm.
1
E Rút Kinh nghiệm:
Trang 2
ĐỀ KIỂM TRA 1 TIẾT TIN 11 (45phút) (Đề còn sử dụng lại không được viết hay ghi một kí hiệu nào vào đề)
I Phần nhậ biết (3đ)
Câu 1 : Dữ liệu kiểu tệp
A được lưu trữ trên ROM.
B được lưu trữ trên RAM.
C chỉ được lưu trữ trên đĩa cứng.
D được lưu trữ trên bộ nhớ ngoài.
Câu 2 : Dữ liệu kiểu tệp
A sẽ bị mất hết khi tắt máy.
B sẽ bị mất hết khi tắt điện đột ngột.
C không bị mất khi tắt máy hoặc mất điện.
D cả A, B, C đều sai.
Câu 3 : Để khai báo biến tệp văn bản :
A Var <tên tệp> : Text;
B Var <tên biến tệp> : Text;
C Var <tên tệp> : String;
D Var <tên biến tệp> : String;
Câu 4 : Để gắn tệp KQ.TXT cho biến tệp f1:
A f1 := ‘KQ.TXT’;
B KQ.TXT := f1;
C Assign(‘KQ.TXT’,f1);
D Assign(f1.‘KQ.TXT’);
Câu 5 : Để mở tệp để đọc dữ liệu ta phải sử dụng :
A Reset(<tên tệp>);
B Reset(<tên biến tệp>);
C Rewrite(<tên tệp>);
D Rewrite(<tên biến tệp>);
Câu 6 : Để mở tệp để ghi kết quả ta phải sử dụng:
A Reset(<tên tệp>);
B Reset(<tên biến tệp>);
C Rewrite(<tên tệp>);
D Rewrite(<tên biến tệp>);
Câu 7 : Để đọc dữ liệu từ tệp VB ta dùng:
A Read(<tên tệp>,<danh sách biến>);
B Read(<tên biến tệp>,<danh sách biến>);
C Write(<tên tệp>,<danh sách biến>);
D Write(<tên biến tệp>,<danh sách biến>)
Câu 8 : Để ghi kết quả vào tệp VB ta dùng:
A Read(<tên tệp>,<danh sách kết quả>);
B Read(<tên biến tệp>,<danh sách kết quả>);
C Write(<tên tệp>,<danh sách kết quả>);
D Write(<tên biến tệp>,<danh sách kết quả>);
Câu 9 : Trong Pascal để đóng tệp ta dùng thủ tục
A Close(<tên biến tệp>); (*)
B Close(<tên tệp>);
C Stop(<tên biến tệp>);
D Stop(<tên tệp>);
Câu 10 : Var <tên biến tệp> : Text ; có ý nghĩa gì ?
A Thủ tục gán tên tệp cho tên tệp cho tên biến tệp.
B Thủ tục mở tên để đọc dữ liệu.
C Khai báo biến tệp.
D Thủ tục đóng tệp
Câu 11 : Assign(<tên biến tệp>,<tên tệp) ;có nghĩa ?
A Thủ tục gán tên tệp cho tên tệp cho tên biến tệp.
B Thủ tục mở tên để đọc dữ liệu.
C Khai báo biến tệp.
D Thủ tục đóng tệp
Câu 12 : Rewrite(<tên biến tệp>) ; có ý nghĩa gì ?
A thủ tục mở tệp để ghi dữ liệu.
B thủ tục đọc dữ liệu từ tệp.
C thủ tục ghi dữ liệu vào tệp.
D thủ tục đóng tệp
II Phần Đọc hiểu chương trình:
A Cho chương trình sau (3 đ)
Chương trình:
(1) program binhphuong;
(2) var a, x: real;
(3) procedure binhphuong1 (b: real; var y: real);
(4) begin
(5) y:=b*b;
(6) Writeln(‘ Binh phuong cua so do la’,y:4:2);
(7) end;
(8) begin
(9) binhphuong1(4,x);
(10) Write(‘ Nhap so can tim a=’); readln(a);
(11) binhphuong1(a,x);
(12) readln;
(13) End.
A) Hãy xác định các tham số hình thức, tham số thực sự, tham trị, tham biến, biến cụ bộ, biến toàn cục (nếu có ở
dòng nào trong chương trình) (2đ)
B) Kết quả ra màn hình sau khi thực hiện chương trình trên? (1đ)
B
(2,0 điểm - Mỗi câu trả lời đúng đạt 0,5 điểm):
Câu 1: Cho chương trình sau:
Var f: text;
Begin
Assign(f,'Khoi11.txt');
Rewrite(f);
Write(f, 105+304-234);
Close(f);
End.
Sau khi thực hiện chương trình, tập tin 'Khoi11.txt' có nội dung như thế nào?
A 105+304-234 B 105304234 C 105 304 234 D 175
Câu 2: Cho chương trình sau:
Trang 3Var g: text;
Begin
Assign(g,'ky2.doc');
Rewrite(g);
Write(g, '510 + 702 - 792');
Close(g);
End.
Sau khi thực hiện chương trình, tập tin 'ky2.doc' có nội dung như thế nào?
A 510 702 792 B 420 C 510 + 702 - 792 D 510702792
C Hãy đọc kỹ đoạn chương trình sau:
Var f,g: file of integer;
Begin
Assign(g,'DLA.txt'); Rewrite(g);
Assign(f,'DLB.txt'); Rewrite(f);
For i:=1 to 10 do
Begin
If i mod 3=2 then write(f,i);
If i div 3=2 then write(g,i);
End;
Close(f); Close(g);
End.
Và hãy trả lời các câu hỏi sau
Câu 3: Sau khi thực hiện chương trình, nội dung của tập tin 'DLA.txt' gồm những phần tử nào?
A 2; 5; 8 B 6; 7; 8 C 5; 8 D 7; 8
Câu 4: Sau khi thực hiện chương trình, nội dung của tập tin 'DLB.txt' gồm những phần tử nào?
A 2; 5; 8 B 6; 7; 8 C 5; 8 D 7; 8
D (2,0 điểm - Mỗi câu trả lời đúng đạt 0,4 điểm):
Hãy đọc kỹ đoạn chương trình sau:
Program timkiem;
Var m: array[1 100] of integer;
i, n, k: integer;
Begin
Write('Ban can nhap bao nhieu so:'); Readln (n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,':'); Readln(m[i]);
End;
Write('Nhap so can tim:'); Readln(k);
i:=0;
While(m[i]=k) or (i>n)Do i:=i+1;
If i>n then Writeln ('Trong day ban da nhap khong co so nguyen nao bang ',k)
else Writeln('Trong day ban da nhap co so bang',k);
Readln; End.
Và hãy trả lời các câu hỏi sau (Từ câu 5 đến câu 9):
Câu 5: Trong chương trình trên có đoạn lệnh có sử dụng vòng lặp While do , điều kiện để chương trình trên thoát
khỏi vòng lặp là:
A m[i]=k B (m[i]=k) hoặc( i>n) C i>n D (m[i]=k) và (i>n)
Câu 6: Giả sử cho mảng m gồm các phần tử lần lượt là: 7, 5, 19, 54 20 Và k = 54 Vậy sau khi thực hiện xong
chương trình, trên màn hình sẽ có dòng thông báo:
A Trong dãy bạn đã nhập có số bằng k B Trong dãy bạn đã nhập có số bằng 54
C Trong day ban da nhap co so bang k D Trong day ban da nhap co so bang 54
Câu 7: Giả sử cho mảng m gồm các phần tử lần lượt là: 7, 5, 19, 54 và 20 Và gán cho biến k= 54 Vậy sau khi thực
hiện xong chương trình, giá trị của n và i sẽ là:
A n = 4 và i = 3; B n = 4 và i = 4 C n=5 và i=3 D n=5 và i=4
Câu 8: Giả sử cho mảng m gồm các phần tử lần lượt là: 19, 5, 18, 90, 45, 69 và 75 Và gán cho biến k = 11 Vậy sau
khi thực hiện xong chương trình, giá trị của n và i sẽ là:
A n = 6 và i = 8; B n = 6 và i = 9 C n=7 và i=8 D n=7 và i=9
Câu 9: Giả sử cho mảng m gồm các phần tử lần lượt là: 19, 5, 18, 90, 45, 69 và 75 Và gán cho biến k = 11 Vậy sau
khi thực hiện xong chương trình, trên màn hình sẽ có dòng thông báo:
A Trong day ban da nhap khong co so nguyen nao bang k
B Trong day ban da nhap khong co so nguyen nao bang 11
C Trong dãy bạn đã nhập không có số nguyên nào bằng k
D Trong dãy bạn đã nhập không có số nguyên nào bằng 11