1. Ổn định lớp, sỹ số. 2. Vào bài:
Hoạt động 1. ễn lại cỏc kiến thức lý thuyết.
Hoạt động của GV Hoạt động của HS Nội dung
Chỳng ta đó học những kiểu DL cú cấu trỳc nào?
Thế nào là kiểu dữ liệu mảng? Cỏc em chỳ ý chỳng ta chỉ ụn lại phần mảng một chiều, mảng hai chiều về nhà cỏc em xem lại.
Thế nào là kiểu dl xõu?
về bản chất xõu là mảng kiểu kớ tự do vậy chỳng ta cú thể truy xuất xõu như truy xuất cỏc phần tử của mảng.
gọi HS so sỏnh 2 xõu ‘tin hoc’ và Tin hoc’
trả lời
mảng là dóy hữu hạn cỏc phàn tử cú cựng kiểu DL.
Xõu là dóy kớ tự trong bộ mó ASCII.
Ghi nhận
1. Kiểu dữ liệu cú cấu trỳc. - Mảng (array). Thao tỏc nhập cỏc phần tử của mảng a cú N phần tử là For i:= 1 to N do Begin Write(‘a[‘, i , ‘]= ‘); readln(a[i]); End; - Xõu (String). + phộp so sỏnh xõu (nhớ qui tắc so sỏnh) + Chỳ ý cỏc thủ tục và hàm xử lớ xõu: ghộp xõu, xoỏ bớt kớ tự trong xõu, chốn thờm, sao chộp cỏc kớ tự của xõu….
Hóy nhắc lại vai trũ của kiểu tệp?
Nờu thứ tự cỏc thao tỏc với tệp Chương trỡnh con là gỡ? Cú mấy loại?
Hóy phõn biệt giữa thủ tục và hàm. Ngoài ra cỏc khỏi niệm biến cục bộ, biến toàn cục, tham biến, tham trị.. về nhà cỏc em xem lại SGK.
trả lới cõu hỏi
trả lới cõu hỏi
2. Dữ liệu kiểu tệp. - vai trũ của kiểu dl tệp. - Cỏc thao tỏc với tệp: + Khai bỏo. + Gắn tờn tệp + Mở tệp + Đọc/ghi tệp 3. Chương trỡnh con - Hàm (function) - Thủ tục (Procedure)
Hoạt động 2: Giải một số bài tập
Bài1. viết chương trỡnh tớnh tổng cỏc số chia hết cho 3 của dóy số nguyờn được nhập từ bàn phớm
Hoạt động của GV Hoạt động của HS Nội dung
Đõy là một bài toỏn quen thuộc
Yờu cầu học sinh tự làm rồi lờn bảng trỡnh bày
Gọi cỏc hs khỏc nhận xột
chuẩn hoỏ bài giải
Nghiờn cứu, lấy nhỏp và làm việc
Lờn bảng trỡnh bày.
Nghe giảng và chộp bài
Var a:array[1..100] of integer; N,i:byte;
S: integer; Begin
Write(‘nhap N’); readln(N);
Writeln(‘nhap cac phan tu cua mang’); For i:=1 to N do Begin Write(‘a[‘,i,’[= ‘); Readln(a[i]); End; S:=0; For i:=1 to N do
If a[i] mod 3 = 0 then s:=s+a[i]; Write(‘tong cac so chia hat cho la‘, s);
Readln; End:
Củng cố: Để chuẩn bị tốt nhất cho bài kiểm tra cuối năm về nhà cỏc em xem lại cỏc vấn đề chỳng ta đó
học trong tiết học hụm nay, đồng thời xem thờm cỏc vấn đề đề cập trong đề cương mà chỳng ta chưa cú thời gian ụn tập lại. xem lại cỏc dạng bài tập cú trong đề cương.
Ngày soạn: 1/05/2011. PPCT: 53 KIỂM TRA HỌC KỲ II
I. Mục tiờu đỏnh giỏ:
- Kiểm tra, đỏnh giỏ khả năng tiếp thu kiến thức, kĩ năng của học sinh về: Cỏc kiểu dữ liệu cú cấu trỳc, chương trỡnh con và dữ liệu kiểu tệp
- Đỏnh giỏ khả năng tổ chức 1 chương trỡnh Pascal với cỏc cấu trỳc cơ bản của chương trỡnh và chương rỡnh con.
II. Phương phỏp ra đề:
III. Đề kiểm tra:
ĐỀ KIỂM TRA
Thời gian: 45 phỳt (khụng kể thời gian giao đề)
I. Phần trắc nghiệm khỏch quan:
1. (Nhận biết) cỏc kiểu dữ liệu cú cấu trỳc bao gồm: A. kiểu mảng, kiểu xõu.
B. Kiểu mảng, kiểu xõu, kiểu bản ghi.
C. Kiểu mảng, kiểu xõu, kiểu bản ghi, kiểu nguyờn, kiểu thực D. Kiểu mảng, kiểu xõu, kiểu bản ghi, kiểu tệp
2. (Nhận biết) Trong ngụn ngữ Pascal, từ khoỏ Text dựng để: A. Khai bỏo tờn chương trỡnh
B. Khai bỏo biến tệp văn bản C. Khai bỏo biến tệp
D. Khai bỏo hằng
3. (Thụng hiểu) Trong ngụn ngữ lập trỡnh Pascal, với cõu lệnh như sau For i:=1 to N do
Begin
Write(‘a[‘,i,’[= ‘); Readln(a[i]);
Nội dung
Mức độ Chương IV Chương V Chương VI
Nhận biết Cõu 1,5 Cõu 2,4 Thụng hiểu Cõu 3,6
End; sẽ thực hiện:
A. Tớnh giỏ trị của A[i] C. lấy cỏc giỏ trị từ mảng a. B. Nhập giỏ trị vào cho mảng a D. Khụng đưa ra gỡ cả
4. (Nhận biết) Trong ngụn ngữ lập trỡnh Pascal, kiểu dữ liệu nào trong cỏc kiểu sau khụng bị mất dữ liệu khi mất điện?
A. Byte B. String C. Text D. Longint
5. (Nhận biết) Trong ngụn ngữ lập trỡnh Pascal, Với khai bỏo mảng
X: Array[1..100] of integer; thỡ việc truy xuất đến cỏc phần tử nào là đỳng: A. X[i] B. X< i> C. X.i D. X(i)
6. (Thụng hiểu) Trong ngụn ngữ lập trỡnh Pascal, để in một xõu kớ tự ra màn hỡnh theo thứ tự ngược lại của cỏc kớ tự trong xõu (Vd: abcd thành dcba), đoạn chương trỡnh nào sau đõy thực hiện việc này?
A. For i:=1 to length(S) do write(S[i]); B. For i:=length(S) downto 1 do write(S[i]); C. For i:=length(S) downto 1 do write(S]); D. For i:=1 to length(S) div 2 do write(S[i]);
7. (Vận dụng) Dưới đõy là một phần của chương trỡnh Pascal: Function vd(a,b,c:integer):integer;
Begin
If (a>=b) and(a>=c) then vd:=a; If (b>=a) and(b>=c) then vd:=b; If (c>=a) and(c>=b) then vd:=c; End.
Giả sử nhập dữ liệu sau: write(vd(6,5, 8));
Sau khi chạy chương trỡnh ta thu được kết quả gỡ?
A. 5 B. 6 C. 8 D. 12
II. Phần tự luận:
8. (Thụng hiểu) Cho chương trỡnh sau: Program vidu; Var f:text; begin assign(f,’vidu.inf’); readln(f.n); n:=n+1; write(‘n= ‘,n);
a. Tỡm và sửa lỗi cỳ phỏp trong chương trỡnh trờn. b. Cho biết chương trỡnh trờn thực hiện cụng việc gỡ?
9. (Vận dụng) Viết hàm tỡm giỏ trị lớn nhất của ba số nguyờn.
IV. Đỏp ỏn - Biểu điểm:
- Phần trắc nghiệm: mỗi cõu trả lời đỳng: 0,5điểm
1B 2B 3B 4C 5A 6B 7C
- Phần tự luận + Cõu 1a: 1 điểm
1b: 1 điểm
- Phỏt hiện được cỏc lỗi thiếu Begin và end 1 điểm
- biết chương trỡnh dựng để tớnh và thụng bỏo ra màn hỡnh diện tớch và chu vi hỡnh vuụng 1điểm + Cõu 2: 4.5 điểm
- Khai bỏo đỳng 2 điểm
- Viết được đoạn tớnh và thụng bỏo ra màn hỡnh 2,5 điểm Mỗi lỗi trừ 0,2 điểm