TIẾT 53: KIỂM TRA HỌC KÌ II
1. Ổn định tổ chức
Lớp | Ngày dạy | Sĩ số | Họ tên học sinh vắng | Ghi chú |
| | | | |
| | | | |
| | | | |
| | | | |
| | | | |
| | | | |
| | | | |
| | | | |
| | | | |
3. Dạy bài mới
ĐỀ BÀI
Câu 1: Hàm là gì? cho ví dụ? Nêu cấu trúc cú pháp của hàm? (1,5đ)
Câu 2: (1đ)
Cho chương trình sau:
Var f:text;
Begin
Assign(f, ‘ABC.txt’);
Rewrite(f)
Write(f, 105+304-234);
close(f)
end.
Sau khi thực hiện chương trình tệp ABC.txt có nội dung như thế nào?
Câu 3: (1.5đ)
Cho chương trình sau:
Var a,b :Integer;
Procedure Hoandoi(Var a,b:Integer);
Var tg: Integer;
Begin
tg:= a; a:=b; b:= tg;
end;
Begin
a:= 10; b:= 11;
Hoandoi(b,a);
Write(a, ‘’, b);
end.
Câu hỏi
Quan sát và cho biết:
+ CTC trên viết theo dạng gì?
+ Nêu các tham số thực sự?
+ Nêu tên các biến cục bộ?
+ CTC trên dùng để làm gì?
+ Lời gọi của CTC trong chương trình chính là lệnh nào?
Câu 4: (4,5đ) Cho mảng T gồm 20 phần tử thuộc kiểu nguyên? Viết chương trình con thực hiện các yêu cầu sau:
Viết thủ tục nhập giá trị cho mảng T từ bàn phím?
Viết hàm tính giá trị trung bình của các phần tử vừa nhập?
Tính tổng các phần tử lẻ , chẵn trong mảng T?
Câu 5(1,5) Viết chương trình con nhập vào 1 xâu s1 dài 15 kí tự và in ra xâu vừa nhập?
