Giao an Tin 9

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (584.67 KB, 91 trang )

(1)<div class='page_container' data-page=1>

Chơng i

ngôn ngữ lập trình turbo pascal

tiết 1 :

giới thiệu chung về ngôn ngữ lập trình pascal

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS nắm đợc các khái niệm cơ bản về ngôn ngữ lập trình Turbo Pascal.
- Nắm đợc lịch sử phát triển, ý nghĩa của Turbo Pascal.

- Hiểu đợc cách khởi động chơng trình và biết áp dụng vào từng trờng hợp cụ
thể trên máy.

- Giáo dục học sinh có thái hc tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KÕt hợp trong giờ dạy.
3. Dạy- học bài mới.

Hot ng ca thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về Turbo Pascal

- GV: Giíi thiƯu vỊ Turbo Pascal
Tác giả, lịch sử phát triển, ý nghĩa
của nó

- Häc sinh theo dâi.
- GV? Em h·y cho biÕt:

? T¸c giả của ngôn ngữ lập trình 
Pascal là ai?

? Lịch sư ph¸t triĨn cđa nã

- Học sinh trả lời câu hỏi.
- GV: Nhận xét đa ra kết luận.
Hoạt động 2:Tìm hiểu vài nét về lịch sử 
phát triển của TP.

1. Giới thiệu về tác giả của ngôn ngữ
lập trình Turbo Pascal

- Giáo d Niklaus Wirth tác giả của ngôn
ngữ lập trình Pascal.

- Sinh năm 1943 tại Thuỵ Sĩ.

- Năm 1963-1967 ông giảng dạy tại trờng
ĐH Tổng hợp Stanford.

- Năm 1967 ông trở về nớc giảng dạy tại
trờng Tổng hợp Zurich.

2. Vài nét về lịch sử phát triển.

- Năm 1968 ông bắt tay và nghiên cứu và

</div>
(2)<div class='page_container' data-page=2>

- GV: Nêu một vài mốc phát triển
của TP

- HS: Quan sát theo dõi.

thiết kế ngôn ngữ lập trình Pascal.

- Năm 1970 chơng trình dịch Pascal đầu
tiên đợc hồn thnh.

- Đầu năm 1971 bản mô tả ngôn ngữ mới
của viện công nghệ Liên Bang Thuỵ Sĩ
đ-ợc công bố trong số đầu tiên của tạp chí
Acta Information.

- HiƯn ®ang sư dơng hai phiên bản
Paslcal.

+ TP For Dos: Chạy trên môi trờng
DOS

+ TP For Win: Chạy trên môi trờng
Winddows.

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về tác giả, lịch sử phát triển của
ngôn ngữ lập trình Turbo Pascal.

- Nhấn mạnh về hoàn cảnh và lịch sử phát triĨn Pascal.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
tiÕt 2 :

giới thiệu chung về ngôn ngữ lập trình pascal

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS nắm đợc ý nghĩa, những điểm nổi bật về ngơn ngữ lập trình Turbo
Pascal.

- Yêu cầu phần mềm khi dùng Turbo Pascal.

- Hiểu đợc cách khởi động chơng trình và biết áp dụng vào từng trờng hợp cụ
thể trên máy.

- Giáo dục học sinh có thái độ học tập tự giác, tích cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

</div>
(3)<div class='page_container' data-page=3>

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Ai là ngời phát triển lên ngôn ngữ lập trình Pascal, nêu vài nét về tác giả?
? Lịch sử phát triển của Turbo Pascal nh thế nào?

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về một số đặc

®iĨm nỉi bËt cđa Turbo Pascal

- GV: Giới thiệu một số đặc điểm
nổi bật của Turbo Pascal

- Häc sinh theo dâi.
- GV? Em h·y cho biÕt:

? Một vài đặc điểm nổi bật của 
Turbo Pascal.

- HS: Thảo luận trả lời câu hỏi.
- GV: Nhận xét đa ra kết luận.
Hoạt động 2:Yêu cầu phần cứng để sử 
dụng Turbo Pascal.

- GV: Giới thiệu một vài cấu hình
cần thiết để sử dụng đợc hai bản TP.

- HS: Quan s¸t theo dâi.

1. Một số đắc điểm về Turbo Pascal

- TP lµ sù kết hợp hài hoà giữa toán học
và công nghệ lập trình

- Đáp ứng nhu cầu trong s phạm.
- Chặt trÏ vỊ c¸u tróc.

- TP đợc coi nh khởi đầu của kỷ ngun
lập trình có cấu trúc.

- §a ra các cấu trúc giữ liệu và kiểu dữ
liệu phong phú.

2. Yêu cầu về phần cứng.

- Hin TP ang c s dụng hai phiên bản
For Dos và For Win.

- Cấu hình máy tính cần thiết để chạy hai
phiên bản này là:

+ Đối với bản For Dos: Máy tính có phần
cứng từ Pentium I tốc độ 133 trở lên.
+ Đối với bản For Win: Máy tính cần có
phần cứng cài đợc HĐH Windows tức từ
Pentium II tốc độ 333 trở lên.

4. Cđng cè, lun tËp:

- Giáo viên khắc sâu kiến thức cho học sinh về một số đặc điểm nổi bật của
ngơn ngữ lập trình Turbo Pascal.

- NhÊn m¹nh về yêu cầu phần cứng máy tính khi chạy Pascal.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
tiÕt 3 :

giới thiệu chung các thành phần của ngôn ngữ lập

trình turbo pascal

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

</div>
(4)<div class='page_container' data-page=4>

I/ mơc tiªu:

- HS:Nắm đợc bộ ký tự, từ khố, tên chuẩn, câu lệnh đợc sử dụng trong ngơn
ngữ lập trình Turbo Pascal.

- Hiểu đợc cách dử dụng bộ ký tự, tên chuẩn, câu lệnh và biết áp dụng vào
từng trờng hợp cụ thể khi lập trình trên máy.

- Giáo dục học sinh có thái độ học tập tự giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Trình bày một số đặc điểm nổi bật của ngôn ngữ lập trình Pascal?
? Trình bày yêu cầu phần cứng khi s dng phn mm?

3. Dạy- học bài mới.

Hot ng của thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về bộ ký tự đợc

sư dơng trong Turbo Pascal

- GV: Giíi thiƯu bé ký tù mµ Turbo
Pascal cã thÓ dïng.

- Häc sinh theo dâi.
- GV?

- Bé chữ cái Latin gồm bao nhiêu
chữ? Lấy ví dụ?

- HS: Thảo luận trả lời câu hỏi.
- GV: Nhận xét đa ra kết luận.
Hoạt động 2:Tìm hiệu từ vựng trong
Turbo Pascal.

- GV: Giới thiệu nêu khái niệm từ
vựng, từ khoá, tên, qui tắc đặt tên trong
Pascal

- HS: Quan s¸t theo dâi.

1. Bé ký tù.

Bé ký tù cđa Pascal bao gồm:
a/ Bộ chữ cái:

- Gồm các chữ cái Latin hoa hay thờng và
dấu gạch thấp "_".

Vd: A,a,B,b...Z,z.

b/ Các chữ số thập phân: 0,1,2...9.
c/ Các ký hiệu khác: +,-,*,/...{,}..

2. Tõ vùng:

- Tập hợp các ký tự tạo thành từ, đợc phân

cách nhau bởi dấu cách

a/ Tõ kho¸:

- Là một dãy ký tự mà ngời dùng phải sử
dụng đứng nh đã đợc định nghĩa trong

</div>
(5)<div class='page_container' data-page=5>

- GV?

Thế nào là từ khoá, cho vÝ dơ?
LÊy vÝ dơ vỊ tªn trong TP?

Thế nào là tên chuẩn? Ta có thể
định nghĩa và dùng lại tên chuẩn hay
không?

Khi đặt tên cho bài tập ta cần chú
ý những điểm gì?

- HS: Th¶o luận trả lời câu hỏi.
- GV: Nhận xét rút ra kh¸i niƯm.

Pascal, khơng đợc sùng vào việc khác
hoặc đặt một tên trùng với một trong các
từ khoá. Các từ khố có thể viết bằng chữ
thờng hay chữ hoa.

- Tõ kho¸ chung: Program, Begin,
End....

- Từ khố để khai báo: Constan,Var,
Integer...

- Tõ kho¸ trong c¸c lƯnh: If...then..
For...to...do

b/ Tên- qui tắc đặt tên:

- Tên là một dãy ký tự liên tiếp dùng để
xác địng các hằng, biến, kiểu, th tc,
hm...

- Tên bắt buộc phải bắt đầu bằng một
chữ cái, có thể tiếp theo là các chữ số hay
các ký tự lạ khác

- Độ dài tối đa của tên không quá 255 ký
tự, trong tên không sử dụng dấu cách.
c/ Tªn chuÈn (Standard)

- Một số tên nh tên các kiểu dữ liệu,
ch-ơng trình con, các hàm (sin,cos...) đã đợc
Pascal định nghĩa sẵn đợc gọi là tên chuẩn
hay tên đợc định nghĩa trớc. Ngời dùng có
thể dùng ngay các tên chuẩn, nhng có thể
định nghĩa lại theo nội dung bài tốn cụ
thể rồi dùng tên chuẩn đó vào việc khác.

VÝ dơ: Boolean, char,type...

4. Cđng cè, lun tËp:

- Giáo viên khắc sâu kiến thức cho học sinh về :
+ Bộ ký tự đợc sử dụng trong lập trình TP.

+ Từ khóa, tên, qui tắc đặt tên, tên chuẩn khi lập trình TP.
- Nhấn mạnh về tên, qui tắc đặt tên trong TP.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
tiết 4 :

giới thiệu chung các thành phần của ngôn ngữ lập
trình turbo pascal

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

</div>
(6)<div class='page_container' data-page=6>

I/ mơc tiªu:

- HS: Nắm đợc một số câu lệnh, hằng, biến đợc sử dụng trong lập trình Turbo
Pascal.

- Hiểu đợc cấu trúc đơn giản của một chơng trình TP, các thành phần trong
một chơng trình TP.

- Giáo dục học sinh có thái độ học tập t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Trình bày bộ ký tự đợc sử dụng trong lập trình Pascal? Lờy ví dụ?

? Cần chú ý những điểm gì khi đặt tên, lấy ví dụ một vài tên có thể sử dụng 
đ-ợc, vài tên khơng hợp lệ trong TP.

? Thế nào là tên chuẩn, cho ví dụ?

3. Dạy- học bài mới.

Hot ng ca thy v trũ Ni dung kiến thức cần đạt
Hoạt động 1:Biến là gì?

- GV: Giới thiệu khái niệm thế nào
là biến.

- Học sinh theo dõi.
- GV?

- Trong toán học biến là gì?

- HS: Thảo luận trả lời câu hỏi.
- GV: Nhận xét ®a ra kÕt luËn.

1. BiÕn.

- Biến là một vị trí trong bộ nhớ để lu giữ
một giá trị nào đó và giá trị đó có thể thay
đổi trong q trình thực hiện chơng trình,
biến phải có tên và phải tuân thủ theo qui
tắc đặt tên. Mỗi biến chỉ có thể nhận một
giá trị nhất định tơng ứng với kiểu của nó.
- Biến phải khai báo tên, kiểu trớc khi sử

dụng nó và có thể đợc gán cho một giá trị
ban đầu.

VÝ dơ: x1,x2 lµ nghiƯm cđa PT bậc 2

trớc khi sử dụng ta phải khai báo trớc

Var x1,x2:Longint;

x1::=0;x2:=0;

2. H»ng:

</div>
(7)<div class='page_container' data-page=7>

Hoạt động 2:Hằng là gì?

- GV: Giới thiệu nêu khái niệm thế
nào là hằng?

- HS: Quan s¸t theo dâi.
- GV?

? Giá trị của hằng có thay đổi đợc
khơng trong q trình tính tốn?

- HS: Thảo luận trả lời câu hỏi.
- GV: NhËn xÐt rót ra khái niệm
thế nào là hằng.

Hot động 3:Dữ liệu là gì gì?

- GV: Giíi thiƯu nªu khái niệm thế
nào là dữ liệu và kiểu dữ liệu?

- HS: Quan sát theo dõi.
- GV?

? Dữ liệu là g×?LÊy vÝ dơ?

?Các giữ liệu có cùng kiểu định
nghĩa ta gọi là gì?

- HS: Th¶o ln tr¶ lêi c©u hái.
- GV: NhËn xÐt rót ra kh¸i niệm
thế nào là dữ liệu và kiểu dữ liƯu.

Hoạt động 4:Tìm hiểu cấu trúc một 
ch-ơng trình TP.

- GV: Giới thiệu cấu trúc đơn giản
của một chơng trình TP.

- HS: Quan sát theo dõi.
- GV?

? Thế nào là một chơng trình TP?
? Một chơng trình TP thờng gồm
mấy phần chính?

- HS: Thảo luận trả lời câu hỏi.
- GV: Nhận xét rút ra cấu trúc một

chơng trình TP.

- L mt loi bin c biệt có giá trị ban
đầu khơng đổi trong suốt q trình thực
hiện chơng trình.

- Hằng đợc đực trng bởi tên và giá trị ban
đầu của nó. Giá trị của hằng sẽ xác định
kiểu cho hằng

- Hằng phải đợc khai báo về tên và giá trị
trớc khi sử dng.

Ví dụ: Khai báo hằng

Const n=100,dem=10;
3. Dữ liệu và kiểu d÷ liƯu:

- Dữ liệu là tất cả những thơng tin mà có
thể mã hố đợc trong máy tính.

- Dữ liệu trong máy tính đợc biểu diễn
d-ới dạng nhị phân (0 và 1)

- Một tập hợp các giá trị thơng tin cùng
một tính chất nào đó c gi l kiu d
liu.

4. Cấu trúc cơ bản của một chơng trình
TP:

- Chng trỡnh TP l mt dóy các lệnh chỉ
thị cho máy thực hiện nhằm hoàn thành
một nhiệm vụ nào đó theo một thứ tự nhất
định.

- CÊu tróc mét chơng trình TP gåm 3
phÇn chÝnh.

+ Phần tiêu đề: Đặt tên cho chơng
trình.

+ PhÇn khai b¸o: C¸c Unit, h»ng,
biÕn, kiểu dữ liệu, chơng trình con...

+ Phần thân chơng trình: Chứa các
lệnh thực hiện thuật giải.

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về các khái niệm :
+ Thế nào là biến?

+ Thế nào là hằng?

+ Thế nào là dữ liệu, kiểu dữ liệu?

</div>
(8)<div class='page_container' data-page=8>

- NhÊn m¹nh vỊ cÊu tróc cđa mét chơng trình TP.

5. Hớng dẫn về nhà:

- GV: Hớng dẫn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Nhận xét Ngày....tháng...năm 2008.

tiết 5 :

hệ thống từ khoá, tên chuẩn
thờng dùng trong turbo pascal

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một số từ khố, tên chuẩn thờng dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cú pháp, cách sử dụng các tên chuẩn, từ khoá trong lập trình.
- HS biết áp dụng vào từng bài tốn cụ thể.

- Giáo dục học sinh có thái độ học tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cũ:

? Trình bày một số khái nịêm và lấy ví dụ về:
+Biến?

+ Hằng?

+Dữ liệu và kiểu dữ liệu?

? Cu trỳc một chơng trình Tp gồm mấy phần? Kể tên các phn ú?

3. Dạy- học bài mới.

</div>
(9)<div class='page_container' data-page=9>

Hot ng của thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Giới thiệu một số từ khoá

chung trong TP.

- GV: Giới thiệu tên, cấu trúc, vị
trí thờng dùng của các từ khoá này, lấy ví
dụ minh hoạ cụ thể cho c¸c tõ kho¸.

- Häc sinh theo dâi.

- GV cho häc sinh tËp lÊy vÝ dơ.
- HS: Th¶o ln lÊy vÝ dơ.

- GV: NhËn xÐt ®a ra cÊu trúc, ý
nghĩa các câu lệnh.

Hot ng 2:Gii thiu mt s từ khoá
dùng để khai báo.

- GV: Giíi thiƯu nªu cÊu tróc, ý
nghÜa, c¸ch sư dơng mét số từ khoá
th-ờng dùng khai báo cho chơng trình TP.

- HS: Quan s¸t theo dâi.

- GV để học sinh tự lấyví dụ minh

hoạ cho các lệnh này.

- HS: Th¶o luận, lấy ví dụ..

- GV: Nhận xét đa ra khái niệm ,
cấu trúc các từ khóa này.

Hot ng 3: Giới thiệu một số từ khoá
dùng trong các lệnh.

- GV: Giíi thiƯu nêu khái niệm,
cấu trúc, c¸ch sư dơng mét sè tõ kho¸
trong c¸c lƯnh.

- HS: Quan s¸t theo dâi.

1. Tõ kho¸ chung:

- Program: Đặt tên cho chơng trình
Vd: Program Baitap1;

Program PT_bac_hai;
- Begin: Bắt đầu chơng trình.
- End. : Kết thúc chơng trình.

2. T khoỏ khai bỏo:

- Var: Bắt đầu thủ tục khai b¸o.
- Const: Khai b¸o h»ng.

Vd: Const: n=10, m=100;

- USES: Khai b¸o th viƯn vµ sư dụng
phiên bản TP nào.

Vd: USES Wincrt; (m«i trêng
Windows)

USES Crt;(môi trờng DOS)
 - Array: Khai báo mảng

Vd: Array A:[1..100] of Integer;

- String: Khai b¸o kiĨu ký tù.

Vd: Key: String(100) (độ dài biến
Key là 100)

- Procedure: Khai b¸o chơng trình con.
Vd: Procedure Tinh_tong;

- Function: Khai bỏo hm do ngời dùng
tự định nghĩa.

Vd:Function
SNT(x:Longint):Boolean;

- Type: Khai b¸o biÕn cã cïng kiĨu d÷
liƯu.

Vd: Type A: Array[1..100]of Longint;

3. Tõ kho¸ trong c¸c lƯnh:

- If...Then...Else: LƯnh kiĨm tra điều
kiện (nếu .... thì....ngợc lại)

Vd: If (a >0) then a là số dơng
Else a la sè ©m

- For...To...Do: Vòng lặp xác định. (chạy

</div>
(10)<div class='page_container' data-page=10>

- GV cho häc sinh tù lÊy ví dụ
minh hoạ cho các lệnh.

- HS: Th¶o luËn lÊy vÝ dơ minh
ho¹.

- GV: NhËn xÐt rót ra kh¸i niƯm,
cÊu tróc, ý nghÜa, vÝ dơ cơ thĨ tõng lƯnh.

Hoạt động 4: Giới thiệu một số từ khoá
dùng biểu diễn toán tử.

- GV: Giíi thiƯu kh¸i niƯm, ý
nghÜa, cÊu tróc cđa mét sè tõ kho¸ biĨu
diƠn to¸n tư.

- HS: Quan s¸t theo dâi.

- GV cho häc sinh tù lÊy ví dụ
minh hoạ cho các từ khoá biểu diễn toán
tử.

- HS: Thảo luËn lÊy vÝ dơ minh
ho¹.

- GV: NhËn xÐt rót ra ý nghÜa, cÊu
tróc mét sè tõ kho¸ biĨu diƠn to¸n tư.

tõ ®©u tíi ®©u)

Vd: For i:=1 to 10 do

(i lần lợt nhận các giá trị từ 1 tới 10)
- While...Do: Vịng lặp khơng xác định
Vd: While n<100 do

Begin

Tg:=Tg+n;
Inc(n);
End;

(Nếu n còn nhỏ hơn 100 thì còn thực hiện
các lệnh sau Do)

4. Từ khoá biểu diễn toán tử:
- AND: Liên kết các điều kiện.

Vd: If (a>0)and(b>0) then
a*b lín h¬n 0;

(Lệnh sau Then chỉ đợc thực hiện khi hai
điều kiện a>0 và b>0 cùng đúng)

- OR: Hoặc (sử dụng liên kết các điều
kiện)

Vd: If (a=0)OR(b=0) then
a*b b»ng 0.

(Lệnh sau Then đợc thực hiện chỉ cần 1
trong hai điều kiện a=0 hặc b=0 sảy ra)
 - DIV: Lệnh lấy phần nguyên của phép
chia.

Vd: 10 DIV 3 =3;
20 div 7 =2;

-MOD: LÊy phÇn d cđa phÐp chia.
VÝ dơ:10 MOD 3 = 1;

20 MOD 7 = 6;

4. Cđng cè, lun tËp:

- Giáo viên khắc sâu kiến thức cho học sinh về c¸c kh¸i niƯm, ý nghÜa, cÊu tróc,
c¸ch dư dơng, vÝ dơ mét sè tõ kho¸ :

+ Dïng chung.
+ Khai b¸o.
+ Trong các lệnh.
+ Biểu diễn toán tử.

- Nhấn mạnh về cấu trúc và ý nghĩa của các loại từ khoá trên.

5. Hớng dẫn về nhà:

- GV: Hớng dẫn học sinh häc tËp ë nhµ theo néi dung vë ghi.

</div>
(11)<div class='page_container' data-page=11>

Bµi tËp:

Lấy ví dụ minh họa mỗi từ khố 2 đến 4 ví dụ.
tiết 6 :

hƯ thèng từ khoá, tên chuẩn
thờng dùng trong turbo pascal

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một số tên chuẩn thờng dùng trong lập trình Turbo Pascal.
- Hiểu đợc cú pháp, cách sử dụng các tờn chun trong lp trỡnh.

- HS biết áp dụng vào từng bài toán cụ thể.

- Giỏo dc hc sinh cú thái độ học tập tự giác, tích cực.

II/ Chn bÞ tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. Kiểm tra bài cũ:

? Trình bày một số khái nịêm và lấy ví dụ về:
+Từ khoá chung?

+ T khoỏ khai báo?
+Từ khoá trong các lệnh?
+Từ khoá biểu diễn toán t?

3. Dạy- học bài mới.

Hot ng ca thy v trũ Nội dung kiến thức cần đạt
Hoạt động 1:Giới thiệu một số tên

chuÈn trong TP.

- GV: Bật mạng Netop Scholl,
chuẩn bị một số bài tập mẫu để biểu diễn
ý nghĩa, cú pháp một số tên thờng dùng.

- Giíi thiƯu tªn.
- Giíi thiƯu cÊu tróc.

1. Mét sè tªn chn.

- Boolean: Khai báo kiểu dữ liệu Logic
Vd: a,b: Boolean;

N,p,q: Boolean;

- Char: Khai báo kiểu dữ liệu ký tự.
Vd: s: Char;

- Integer:Khai b¸o kiĨu d÷ liƯu sè

</div>
(12)<div class='page_container' data-page=12>

- VÞ trÝ thêng dïng cña các tên
chuẩn này

- Ly vớ d minh hoạ cụ thể cho
các tên chuẩn đó.

- Häc sinh theo dâi.

- GV cho häc sinh tËp lÊy vÝ dô.
- HS: Th¶o ln lÊy vÝ dơ.

- GV: Nhận xét đa ra cấu trúc, ý
nghĩa một số tên chuẩn.

nguyên

- Real: Kiểu dữ liệu số thực.

- Maxint: Kiểu dữ liệu là số lớn nhất của
sô nguyên

- ABS(x): Lấy giá trị tuyệt đối của x.
Vd: ABS(10)=10

ABS(-20)=20

- COS(x): LÊy Cos cña x.

Vd: Cos(0)=1;

Cos(60)=
2
1
;

- SIN(x): Lấy Sin của x.
Vd: Sin(90)=1;

Sin(30)=
2
1

;

- RUOND(x,n): Làm tròn số x tới n chữ
số thập phân.

Vd: Round(3.12456,3)=3.12
Round(2.5467,2)=2.54

- TRUNC(x): Làm tròn số x đến số gần
nhất.

Vd: Trunc(3.257)=2.3
Trunc(7.233)=7.2

- SQR(x): Lấy bình phơng số x
Vd: SQR(3)=9

SQR(9)=81

- SQRT(x): Lấy căn bậc hai của x
Vd: Sqrt(25)=5

Sqrt(36)=6

- INC(x): Tng giá trị của x thêm 1 đơn
vị

Vd: Inc(10) -> KQ =11;

- READL(x):Đọc vào giá trị x tõ bµn
phÝm.

- READLN(x): Đọc vào giá trị x từ bàn
phím sau đó suống dịng.

- WRITE( Thong bao ):‘ ’ ViÕt ra màn
hình một dòng thông báo.

Vd: Write( Bai tap 1);

- WRITELN( Thong bao ):‘ ’ Viết ra
màn hình một dịng thơng báo sau đó

</div>
(13)<div class='page_container' data-page=13>

sng dßng.

Vd: Writeln(‘ Bai tap 2’);

4. Cđng cè, lun tập:

- Giáo viên khắc sâu kiến thức cho học sinh vỊ c¸c kh¸i niƯm, ý nghÜa, cÊu tróc,
c¸ch dư dơng, ví dụ một số tên chuẩn :

- Nhấn mạnh về ý nghĩa và vị trí thờng sử dụng của các từ khoá này.

5. Hớng dẫn về nhà:

- GV: Hớng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tËp:

Lấy ví dụ minh họa mỗi tên chuẩn từ 2 đến 4 ví dụ.
tiết 7 :

c¸c kiĨu d÷ liƯu chn

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một số kiểu dữ liệu chuẩn thờng dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng các kiểu dữ liệu đó trong lập trình.
- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Trình bày một số khái nịêm và lấy ví dụ về:Một số tên chuẩn thờng dùng 
trong TP?

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt

</div>
(14)<div class='page_container' data-page=14>

Hoạt động 1:Tìm hiểu kiểu số nguyên
(Integer)

- GV: BËt m¹ng Netop Scholl,
chuÈn bÞ mét sè vÝ dơ vỊ kiĨu d÷ liƯu
Integer.

- GV đặt câu hỏi

? ThÕ nµo lµ sè nguyªn, lÊy vÝ
dơ?

? Theo em trong TP thì kiểu số
nguyên Integer có đợc dùng nh
trong tốn học khơng?

? Ta có thể áp dụng đợc những
phép toán nào với kiểu số nguyờn
ny?

- HS thảo luận trả lời câu hỏi.
- HS khác nhận xét, bổ sung.

- Giáo viên nhËn xÐt ®a ra khái
niện thế nào là kiểu số Integer?

? Những số nào sau đây thuộc và
không thuộc kiểu số nguyên (Integer)

5; -8; 1067; 2,15; 6; -48,125;
-47345; 57213

Hoạt động 2: Giới thiệu một số phép
tốn có thể sử dụng với kiểu dữ liệu
Integer

- GV? Ta thêng sư dơng nh÷ng
phÐp toán số học nào?

Ta cú th d oỏn xem vi kiểu số
ngun Integer thì những phép tốn nào
có thể sử dng c?

- HS thảo luận xây dựng bài, học
sinh khác nhận xét, bổ sung.

- GV: Nhận xét và đa ra kÕt ln.

1. KiĨu sè nguyªn (Integer).

- Kiểu số nguyên đợc định nghĩa sẵn với
tên chuẩn Integer và tập là tập hợp của các
số nguyên, có thể biểu diễn đợc trên máy.

Thứ tự sắp xếp căn cứ theo giá trị của các
số nguyên. Kiểu này đợc biểu diễn bằn các
chữ số từ 0 đến 9 theo hệ cơ số 10 có thể có
dấu ở đầu hay khơng.

- Các số nguyên thuộc kiểu Integer đợc
giới hạn trong khoảng từ -215 đến 215 -1 (từ

-32768 đến +32767).

- Số +32767 đợc TP định nghĩa sẵn dới tên
hằng chuẩn: MaxInt.(số nguyên cực đại)

- Gần đây TP còn định nghĩa thêm một số
kiểu đơn giản để dùng rễ sử dụng.

KiĨu Ph¹m vi biĨu diƠn

Byte 0…255

Shortint -128…127

Word 0…65635

Longint -2147483648..2147483647

2. C¸c phÐp to¸n sư dơng víi kiểu dữ
liệu Integer.

a/ Các phép toán số häc:

Vd: 234+123=357

12*3=36
50/2=25
10-8=2

b/ C¸c phÐp to¸n Div, Mod
Vd: 10 Div 3=3;

10 mod 4=2
c/ C¸c phÐp to¸n so s¸nh:

- Cã 5 phÐp to¸n so s¸nh (>,<,=,>=,<=)

Vd: 5>3
4<9
3=3
8>=8
5<=5

d/ Các hàm áp dụng với các đối số có kiểu
Integer

- Cho giá trị tuyệt đối: Abs(x);
- Cho giá trị bình phơng: Sqr(x)

</div>
(15)<div class='page_container' data-page=15>

- Cho giá trị của căn bậc hai: Sqrt(x)

- Cho giá trị các hàm lợng giacs: Sin(x),
Cos(x), Tag(x)

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về kiểu dữ liƯu sè nguyªn (Integer)

- Nhấn mạnh về ý nghĩa cách khai báo kiểu dữ liệu khi sử dụng để tiết kiệm bộ
nhớ, tăng thời gian chạy Test.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tËp:

LÊy vÝ dơ minh họa cho 4 kiểu dữ liệu trên.
tiết 8 :

các kiểu dữ liệu chuẩn

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một số kiểu dữ liệu chuẩn thờng dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng các kiểu dữ liệu đó trong lập trình.
- HS biết áp dụng vào từng bài tốn cụ thể.

- Giáo dục học sinh có thái độ học tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cũ:

? Trình bày một số khái nịêm kiểu dữ liệu Integer?

?Các phép toán nào có thể sử dụng trong kiểu dữ liệu Integer, cho ví dụ?

3. Dạy- học bài mới.

Hot động của thầy và trò Nội dung kiến thức cần đạt

</div>
(16)<div class='page_container' data-page=16>

Hoạt động 1:Tìm hiểu kiểu số nguyên
(Integer)

- GV: BËt m¹ng Netop Scholl,
chuÈn bÞ mét sè vÝ dô vỊ kiĨu d÷ liÖu
Real.

- GV đặt câu hỏi

? Thế nào là số thực, lấy ví dụ?
 ? Theo em trong TP thì kiểu số
ngun Real có đợc dùng nh trong
tốn học khơng?

? Ta có thể áp dụng đợc những
phép toán nào với kiểu số nguyên
này?

- HS thảo luận trả lời câu hỏi.
- HS khác nhận xét, bổ sung.

- Giáo viên nhËn xÐt ®a ra khái
niện thế nào là kiểu số Integer?

? Những số nào sau đây thuộc và
không thuộc kiểu số thực (Real)

5; -8; 1067; 2,15; 6; -48,125;
-47345; 57213

Hoạt động 2: Giới thiệu một số phép
toán có thể sử dụng với kiểu dữ liệu
Integer

- GV? Ta thêng sư dơng nh÷ng
phÐp toán số học nào?

1. Kiểu số thực (Real).
a/ Định nghĩa:

- Là tập hợp các số thực có thể biểu diễn
ở trên máy, đợc ký hiệu là Real.

- Thø tự sắp xếp căn cứ vào giá trị của các
số thùc.

- Kiểu này đợc biểu diễn bởi các số từ 0
tới 9 có thể có dấu ở đầu.

- Giới hạn biểu diễn các số này tuỳ thuộc
vào máy và chơng trình dịch.

Vd: Vi TP 3.0 thỡ gii hn ny l
t -1.7*10-38 n 1.7*1038

b/ Phân loại:

* Dạng thập phân bình thờng: Phần
nguyên và phần thập phân đợc viết nh
bình thờng còn dấu chấm để ngăn cách
giữ chúng

- Khi viết cần viết đủ cả phần nguyên,
dấu chấm,phần thập phân. Khi phần thập
phân bằng 0 ta có thể bỏ cả dấu chấm và
phần thập phân. Không đợc dùng dấu
chấm khi thiếu một trong hai phần.

- Dấu phẩy này đựoc viết cố định nên đợc
gọi là dấu phẩy tĩnh.

Vd: Viết đúng 3.1; 6.78
Viết sai: .55; 67.

* Dạng số mũ: Dạng này gồm phần định
trị và phần số mũ đợc viết sau chữ E (số
mũ cơ số 10) , trong đó cả hai phần có thể
có dấu đi kèm.

- Phần định trị đợc viết nh dạng thập phân
bình thờng.

- Dấu phẩy phụ thuộc vào phần thập phân
định trị nên đợc gọi là dấu phẩy động

Vd: -4.789E-02
578.2345E+04

2. C¸c phÐp to¸n sư dụng với kiểu dữ
liệu Real.

a/ Các phép toán số học:

Vd: 234.23+23.24=257.47
6.4*3=19.2

</div>
(17)<div class='page_container' data-page=17>

Ta có thể dự đốn xem với kiểu số
thực Real thì những phép tốn nào có
thể sử dụng đợc?

- HS thảo luận xây dựng bài, học
sinh khác nhận xét, bổ sung.

- GV: Nhận xét và đa ra kết luận.

5.4/2=2.7
4.2-8=-3.8
b/ Các phÐp to¸n Div, Mod

Vd: 10.01 Div 3=3;
10.3 mod 4=0.3

c/ C¸c phÐp to¸n so s¸nh:

- Cã 5 phÐp to¸n so s¸nh (>,<,=,>=,<=)

Vd: 5.3>2.3
4<9.56
3.3=3.3
8.1>=8.1
5<=5

d/ Các hàm áp dụng với các đối số có kiểu
Integer

- Cho giá trị tuyệt đối: Abs(x);
- Cho giá trị bình phơng: Sqr(x)
- Cho giá trị của căn bc hai: Sqrt(x)

- Cho giá trị các hàm lợng giacs: Sin(x),
Cos(x), Tag(x)

- Hàm làm tròn: Trunc, Round...

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về kiểu dữ liệu số thực (Real)

- Nhấn mạnh về ý nghĩa cách sử dụng các hàm có sắn trong TP víi kiĨu sè thùc.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tËp:

LÊy vÝ dơ minh häa cho kiểu dữ liệu Real?
Cách biểu diễn số thực ở hai dạng.

Các phép toán sử dụng tính toán với số thực.

Nhận xét Ngày....tháng...năm 2007.

tiết 9 :

các kiểu dữ liệu chuẩn

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

</div>
(18)<div class='page_container' data-page=18>

I/ mơc tiªu:

- HS: Nắm đợc một số kiểu dữ liệu chuẩn thờng dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng các kiểu dữ liệu đó trong lập trình.
- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tích cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Trình bày một số khái nịêm kiểu dữ liệu Real?

? Em hÃy biểu diƠn sè thùc sau ë hai dậng biĨu diƠn cđa nó: -0.00000345

?Các phép toán nào có thể sử dụng trong kiểu dữ liệu Real, cho ví dụ?

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu kiểu dữ liệu

Logic Boolean

- GV: BËt m¹ng Netop Scholl,
chuÈn bÞ mét sè vÝ dơ vỊ kiĨu d÷ liƯu
Boolean.

- GV đặt câu hỏi

? ThÕ nµo lµ phÐp to¸n quan hƯ,
lÊy vÝ dơ?

? Theo em trong TP dữ liệu
Boolean có sử dụng đợc các phép
toán số học nh hai kiểu dữ liu
trờn khụng?

- HS thảo luận trả lời câu hỏi.
- HS kh¸c nhËn xÐt, bỉ sung.

- Gi¸o viªn nhËn xÐt đa ra khái
niện thế nào là kiểu dữ liệu Boolean?

1. Kiểu Logic Boolean.

a/ Định nghĩa:

- Trong các phép toán so sánh (phép toán
quan hệ) với các số thực, số nguyên ở
trên bao giờ cũng chỉ thu đợc hai kết quả
là đúng hoặc sai. Tập hợp của hai giá trị
này là một kiểu dữ liệu đợc định nghĩa sẵn
với tên chuẩn là Boolean. Hai giá trị này
có tên đợc định nghĩa sẵn là True (đúng)
False (sai) đợc xếp theo thứ tự False<
True

b/ C¸c phÐp to¸n víi kiĨu Logic.

- Các phép toán này đều cho kết quảlà
kiểu logic Boolean nên có thể sử dụng các
tốn tử logic sau

+ NOT: Phủ định (logic đảo): Chỉ làm

</div>
(19)<div class='page_container' data-page=19>

Hoạt động 2: Giới dữ liệu kiểu ký 
tự-Character.

- GV: BËt m¹ng Netop Scholl,
chuÈn bÞ mét sè vÝ dơ vỊ kiĨu d÷ liƯu
Character.

- GV đặt câu hỏi

? Những dữ liệu nào đợc coi là

kiểu ký tự, lấy ví dụ?

? Theo em trong TP dữ liệu
Character có sử dụng đợc các
phép toán số học nh hai kiểu dữ
liệu trên không?

- HS thảo luận trả lời câu hỏi.
- HS khác nhận xét, bổ sung.

- Giáo viên nhËn xÐt ®a ra khái
niện thế nào là kiểu dữ liệu ký tù?

việc với một toán hạng đứng sau NOT và
cho giá trị ngợc lại của toán hạng logic
này.

Vd: NOT a>2 -> KQ a<2

+ AND: Và (logic kết hợp):Cho kết quả

True khi và chỉ khi hai toán hạng đều

True

Vd: (a>0)AND(a=0)

+ OR: Hoặc (logic đại diện): Cho kết quả
là False khi và chỉ khi cả hai tốn hạng
đều False.

Ta cã b¶ng biĨu diƠn sau:

X Y X and Y X or Y

False False False False
False True False True

True False False True

True True True False

2. KiÓu ký tù Character
a/ Định nghĩa:

- L dng d liu kiểu chữ viết nh văn
bản. Tập hợp tất cả ký tự tạo nên các chữ
viết của Pascal tạo thành một kiểu dữ liệu
đợc định nghĩa sẵn với tên chuẩn CHAR
b/ Các phép tốn:

- C¸c phÐp to¸n so sánh (quan hệ) thực
hiện tơng tù nh sè nguyªn dùa trªn m·
ASCII cđa c¸c ký tù.

- Có thể thực hiện các phép toán số học
sau khi chuyển đổi kiểu Char sang kiểu
Integer thông qua hàm ORD(ch).

c/ Các hàm liên quan đến kiểu ký tự:

- Cho số thứ tự (giá trị mÃ): Ord(ch)
Vd: Ord(a)=15

- Cho ký tù có giá trị là số nguyên n
Ord(n).

- Cho ký tự đứng trớc ch : Pred(ch)
- Cho ký tự đứng sau ch: Succ(ch)

- Cho ký tự là chữ hoa của ch: Upcase(ch)
- Cho ký tự là phím đợc bấm trên bàn
phím: Readkey

4. Cđng cè, lun tập:

</div>
(20)<div class='page_container' data-page=20>

- Giáo viên khắc sâu kiến thức cho học sinh về kiểu dữ liệu logic và kiểu ký tự.
- Nhấn mạnh về ý nghĩa cách sử dụng các hàm có sắn trong TP với 2 kiểu dữ
liƯu nµy.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bài tập:

Lấy ví dụ minh họa cho kiểu dữ liƯu Boolean, Character?

</div>
(21)<div class='page_container' data-page=21>

tiÕt 10 :

d÷ liƯu cã cÊu tróc

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một kiểu dữ liệu có cấu trúc dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng các kiểu dữ liệu đó.
- HS biết áp dụng vào từng bài tốn cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chn bÞ tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. Kiểm tra bài cũ:

? Trình bày một số khái nịêm kiểu dữ liệu Logic?

? Các phép toán nào có thể sử dụng với kiểu dữ liệu Logic này?

3. Dạy- học bµi míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về cấu trúc dữ

liƯu

- GV: BËt m¹ng Netop Scholl,
chn bÞ mét sè vÝ dơ vỊ kiĨu d÷ liƯu cã
cÊu tróc.

- GV đặt câu hỏi

? Thế nào là kiểu dữ liệu có cấu
trúc?

- HS thảo luận trả lời câu hỏi.
- HS khác nhận xét, bổ sung.

- Giáo viên nhận xÐt ®a ra khái
niện thế nào là kiểu dữ liệu có cấu trúc?

I. Khái niệm về cấu trúc dữ liệu.

- L kiểu dữ liệu đợc tạo ra bằng cách tổ
chức các phần tử có kiểu đơn giản theo
một qui cỏch nht nh.

- Có hai đăch trng của một kiểu dữ liêu có
cấu trúc là:

+ Kiểu của các phần tử

+ Phơng pháp tổ chức kiểu dữ liệu.
- Có 4 kiểu dữ liệu có cấu trúc:
+ Mảng: Array.

+ Tập hợp: Set.
+ B¶n ghi: Record.
+ File.

</div>
(22)<div class='page_container' data-page=22>

Hoạt động 2: Tìm hiểu dữ liệu kiểu xâu

ký tự.

-GV: Nêu định nghĩa kiểu dữ liệu
xâu ký tự.

- HS quan s¸t, theo dâi.

- GV lấy ví dụ minh hoạ cho kiểu
dữ liệu này.

?GV cho học sinh tự lấy một vài
ví dụ về kiểu dữ liƯu nµy.

-GV và học sinh cùng tìm hiểu độ
dài của String.

Vd: Ten HS= Nguyễn Văn Anh.

? Theo em biến TénH có độ dài
bằng bao nhiêu?

? Độ dài đó tìm đợc bằng cách
nào?

?GV cho hs nhận xét, trả lời và lấy
ví dụ về độ dài của String.

-HS: Quan sát lấy ví dụ minh hoạ.
-GV: Nhận xét, đa ra khái niệm,
cách xác định độ dài của một

String(xâu).

GV vµ häc sinh cùng tìm hiểu các
phép toán với kiểu String.

?Thế nào là phép gán, lấy ví dụ?

? Lấy một vài ví dụ về phép công
xâu?

? Ta có thĨ nh©n, chia, trừ xâu
không?

? Hai xõu mun bit cv các ký
tự trong xâu, độ lớn của xâu ta thực hin
c phộp toỏn gỡ?

? Thế nào gọi là xâu con, hai xâu
giống nhau?

-GV: Đa ra các ví dụ về phép cộng

II/ Kiểu xâu ký tự:
1/ Định nghĩa:

- L mt dóy các ký tự bất kỳ liên tiếp có
độ dài tối đa xác định trớc. Kiểu dữ liệu
này đợc mô tả bằng từ khố STRING và
tiếp sau đó là độ dài tối đa của xâu ký tự
đặt trong ngoặc vuông nh sau:

STRING[độ dài tối đa của xâu];
- Việc khai báo kiểu xâu ký tự thờng đợc
mô tả trực tiếp sau t khoỏ Var.

VD: Ten: String[8];
Ho_dem:String[15]

2/ Độ dài của String.

- Là số ký tự bao gồm cả ký tự trống, tính
từ ký tự bắt đầu bên phải đến ký tự cuối
cùng bên trái.

- Độ dài của String luôn nhỏ hặc bằng hơn
độ dài tối đa mà biến đã nhận.

Vd: BiÕn Tªn :String[8].
Độ dài của Tên<= 8 ký tự

3/ Các phép to¸n víi kiĨu String.
a/ PhÐp g¸n:

- Ta cã thĨ g¸n trực tiếp cả một biến String
bằng một sâu ký tự.

Vd: Ten:="Nguyen Văn Anh

b/ Phép cộng.

- Ta thc hin phộp cng để ghép các sâu
ký tự lại với nhau tạo ra xõu ký t chung.
-Vd: Ten:="Anh"

Ho_dem:="Nguyễn Văn"
Ho_ten:=Ten+Ho_dem

Lúc này Ho_ten=" Nguyễn Văn Anh"
Chó ý:

- Nếu độ dài của xâu sau khi ghép lớn hơn
độ dài tối đa của String thì nững ký tự
đứng sau s b mt.

</div>
(23)<div class='page_container' data-page=23>

xâu, phép gán, phép so sánh.
- HS thảo luận, trả lời.

-GV: Nhận xét và đa ra kết luận.

- Không có phép trừ, nhân, chia các String
c/ So sánh các String.

- Các String có thể đem so sánh với nhau
với nguyên tắc là:

+ Cỏc phn t của 2 String sẽ so sánh với
nhau từng đôi một theo thứ tự.

+ Nếu 2 String có các phần tử giống nhau
thì String có độ dài nhỏ hơn gọi là xâu

con.

+ Hai String đợc coi là bằng nhau nếu 2
String có các phần tử giống nhau và độ
dài giống nhau.

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho häc sinh vỊ kiĨu d÷ liƯu cã cÊu tróc
- Nhấn mạnh về ý nghĩa cách sử dụng các phép toán với kiểu dữ liệu này.

5. Hớng dẫn về nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo nội dung vở ghi.
Với mỗi phép toán ta láy mét vµi vÝ dơ.

Bµi tËp:

LÊy vÝ dơ minh häa cho kiĨu d÷ cã cÊu tróc.?

tiÕt 11 :

d÷ liƯu cã cÊu tróc

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một kiểu dữ liệu có cấu trúc dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng các kiểu dữ liệu đó.
- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

</div>
(24)<div class='page_container' data-page=24>

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Trình bày khái niệm về cấu trúc dữ liệu ?

?Th no l kiểu xâu ký tự, độ dài của một sâu đợc tớnh ntn??

3. Dạy- học bài mới.

Hot ng ca thy v trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về cấu trúc dữ

liÖu

- GV: BËt mạng Netop Scholl,
chuẩn bị một số ví dụ về các hàm, thủ tục
chuẩn áp dụng với kiểu dữ liệu String.

- GV giới thiệu hàm Length

? Hàm Length có chức năng gì?

- HS thảo luận trả lời câu hỏi.

-GV giới thiệu, lÊy vÝ dô hàm
Copy.

?Hàm Copy có chức năng gì?
- HS thảo luận trả lời.

- GV giới thiệu hàm Concat.

?Muốn nối 2 xâu lại với nhau ta
làm ntn?

HS thảo luận trả lời.

? Để kiểm tra vị trí bắt đầu của
xâu con trong x©u mĐ ta sư dơng hàm
nào?

Gv giới thiệu các thủ tục trong TP

1. Các hàm, thủ tục chuẩn áp dụng với
kiểu String

a/ Các hàm:

- Cho kết quả độ dài của một xâu ký tự:

Length(St)

Vd: Cho xâu ký tự sau:

S=" Trờng THCS Thái Hòa"
Ta có: Length(S)=20

(Ta nói độ dài của xâu là 20)

- Copy(S,n,m): Cho xâu ký tự mới đợc cắt
ra từ xâu S ban đầu có độ dài m, từ ký tự
thứ n tr i.

Vd: S=" Trờng THCS Thái Hòa"

Copy(S,8,12)

Kết quả cho xâu mới: "THCS Thái Hòa"
- Concat(S1,S2,S3,…,Sn): Cho xâu ký tự
mới đợc ghép từ cỏc xõu: S1,S2,Sn
Vd: S1="Trng"

S2="THCS"
S3="Thái"
S4="Hòa"

Concat(S1,S2,S3,S4)

Cho xâu mới S="Trờng THCS Thái Hòa"
- Pos(S1,S): Trả giá trị đầu tiên khi gặp
xâu con S1 xuất hiện trong xâu mẹ S.
Vd: Cho S="Trờng THCS Thái Hòa"

S1="THCS"

Pos(S1,S): Cho giá trị là 8

(Ti v trí thứ 8 sâu S1 đợc xuất hiện trong
xâu S)

b/ Các thủ tục:

</div>
(25)<div class='page_container' data-page=25>

?Để loại bỏ bớt ký tự trong xâu ta
sử dụng thủ tục nào?

Để chèn thêm một xâu vào xâu cũ
ta làm ntn?

?Mun i s ra xâu, xâu ra số ta
tiến hành nh thế nào?

HS: Theo dõi, thảo luận trả lời câu
hỏi.

HS khác nhận xét, bổ xung.

GV nhận xét, đa ra cú pháp, cách
sử dụng các hµm

Hoạt động 2: Tìm hiểu cách ứng dụng,
sử dụng các hàm, thủ tục trong chơng
trình TP.

GV: §a vÝ dơ vỊ các hàm, thủ tục
trên.

HS lấy ví dụ, viết chơng trình hoàn

chỉnh.

- Delete(S,n,m): Loại bỏ m ký tự từ ký tự
thứ n trở đi

Vd: Cho xâu S="Trờng THCS Thái Hòa"

Delete(S,4,8)

Thu c xõu mi l S="Trng Thỏi

Hòa"

- Insert(S1,S2,n): Chèn thêm xâu ký tự 1
vào vị trí n của xâu ký tự 2)

Vd: S1="THCS"

S2="Trờng Thái Hòa"
Insert(S1,S2,8).

Ta c xõu S mi nh sau:

S="Trờng THCS Thái Hòa"

- Val(S1,V,Code): Đổi xâu S1 thành số
Vd: Cho S1="12567"

Val(S1,V,Code)

Cho kết quả là: V=12567
Chú ý: Code:Integer.

- STR(biểu thức số,S):Đổi biểu thức số ra
xâu ký tự S.

Vd: STR(123456,S)

Cho kết quả xâu S="123456"

2/ Các ví dụ:

Viết đoạn chơng trình :

- Tính độ dài của xâu:
- Ghép hai xâu.

- T×m vị trí bắt đầu cđa x©u con
trong x©u mĐ.

Program Vd;
Uses Wincrt;

Var S,S1,S2:String[100]
Code:Integer;
Begin

Write(Nhập xâu S1=);Readln(S1);

Write(Nhập xâu S2=);Readln(S2);
L:=Length(S1);

Write(Độ dài của xâu S1 là:,L);
S:=Concat(S1,S2);

Write( Xõu c ghộp l:,S);
Vt:=Pos(S1,S2);

Write(Vị trí bắt đầu của x©u con

</div>
(26)<div class='page_container' data-page=26>

trong x©u mĐ là:,Vt);
End.

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về các hàm, thủ tục hay sư dơng
trong TP víi kiĨu d÷ liƯu String.

- NhÊn mạnh về ý nghĩa cách sử dụng các phép toán với kiểu dữ liệu này.

5. Hớng dẫn về nhà:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo nội dung vở ghi.
Với mỗi phép toán ta láy một vµi vÝ dơ.

Bµi tËp:

Viết chơng trình: Ghép các xâu, tìm độ dài các xâu, xố bớt xâu.
tiết 12 :

d÷ liƯu cã cÊu tróc

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một kiểu dữ liệu có cấu trúc dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng dữ liệu kiểu mảng.
- HS biết áp dụng vào từng bài tốn cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chn bÞ tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. Kiểm tra bài cũ:

? Trình bày, lấy ví dụ về một số hàm trong String ?
?Trình bày, lấy ví dụ về các thủ tục trong String?

3. Dạy- học bài mới.

Hot động của thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu dữ liệu kiểu II. Kiểu mảng.

</div>
(27)<div class='page_container' data-page=27>

m¶ng.

- GV: BËt m¹ng Netop Scholl,
chuÈn bÞ mét sè vÝ dơ vỊ dữ liệu kiểu
mảng, các ví dụ về dữ liệu kiểu mảng..

- HS quan sát, trả lời các câu

hỏi.

? Mảng là gì?

? Cỏch khai bỏo mng.
?Cỏch c, duyt mng.

?Cáchchép mảng A cho mảng B.

HS thảo luận trả lêi.

GV: NhËn xÐt, rót ra kÕt ln.

Hoạt động 2: Tìm hiểu một số ví dụ về
dữ liệu kiểu mảng.

GV lấy ví dụ về đoạn mã lệnh
dùng để sao chép hai mảng cho nhau.

HS: Theo dâi, th¶o luận trả lời câu
hỏi.

HS khác nhận xét, bổ xung.

GV nhận xét, đa ra cú pháp, cách
sử dụng các hàm

a/ Định nghÜa

- Là tập hợp hữu hạn các phần tử có cùng

một kiểu dữ liệu đợc tổ chức thành 1 hay
nhiều chiu.

b/ Khai báo:

- Cú pháp:

Tên mảng:Array[kiểu chỉ dẫn] Of kiểu
phần tử.

Vd: A:Array[1..100] Of Integer;
A: Tên mảng.

1..100: Chỉ dẫn mảng gồm 100
phần tử

Kiểu phần tử là kiểu số nguyªn.

c/ Truy nhập, gán, đọc dữ liệu kiu
mng.

- Nhập từ bàn phím các phần tử cho m¶ng.
Writeln(‘ NhËp dl cho m¶ng’);
For i:=1 to 10 do

Begin

Write(‘A[‘,i,’]=’);
Readln(A[i]);
End;

- ViÕt dữ liệu từ mảng ra:
Writeln( In du lieu):
For i:=1 to 10 do

Writeln(A[i]);
2/ Mét sè vÝ dơ vỊ m¶ng.
a/ ChÐp m¶ng.

- Chép mảng A sang mảng B có cùng kiểu
dữ liệu.

Vd: A={2,5,6,7,2,6,8} ta chÐp m¶ng A
sang m¶ng B.

k:=1;

4. Cđng cè, lun tập:

- Giáo viên khắc sâu kiến thức cho học sinh dữ liệu kiểu mảng.

- Nhấn mạnh về ý nghĩa cách sử dụng các phép toán với kiểu dữ liệu này.

5. Híng dÉn vỊ nhµ:

</div>
(28)<div class='page_container' data-page=28>

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vở ghi.
Với mỗi phép toán ta láy một vài ví dụ.

Bài tập:

Viết chơng trình: Đọc, xuất, gán mảng cho nhau.

Nhận xét Ngày....tháng...năm 2007.

tiết 13 :

d÷ liƯu cã cÊu tróc

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một kiểu dữ liệu có cấu trúc dùng trong lập trình Turbo
Pascal.

- Hiểu đợc cách sử dụng dữ liệu kiểu mảng.
- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tỉ chøc giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Trình bày khái niệm về mảng, ?

?Trình bày cách khai báo mảng 1 và nhiều chiều.

3. Dạy- học bài mới.

Hot ng ca thy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu bài tốn chép

m¶ng.

- GV: Bật mạng Netop Scholl, cho
chạy chơng trình đã đợc chuẩn bị trớc.

1/ Bµi toán chép mảng.

- Chép mảng A sang mảng B có cïng kiĨu
d÷ liƯu.

Vd: A={2,5,6,7,2,6,8} ta chÐp m¶ng A

</div>
(29)<div class='page_container' data-page=29>

- HS quan sát, trả lời các câu hỏi.

?Bi toỏn ó lm uc vic gỡ?

Đặt các câu hỏi với các lệnh.

? A: Array[1..30] ò Ineger; ?
?Writeln(); ?

?Để vào dữ liệu cho mảng ta phải
làm gì?

? Tại sao sau For ta phải sử dụng
vòng Begin End;?

- HS quan sát trả lời câu hỏi, xây
dựng bài.

- GV nhận xét đa ra kết luận, thuật

toán hoàn chỉnh của bài toán.

Hot ng 2: Tỡm hiểu thuật tốn tìm
Min của một mảng.

GV: Cho chạy chơng trình trên
mạng Netop School để học sinh quan sát,
tìm hiểu kết quả của bài tốn.

- GV cïng HS x©y dùng thuật toán
thông qua các câu hỏi?

? Muồn tìm Min của một dÃy các
số hạng ta thờng làm nh thế nào?

? Biến Min trong thuật toán có vai
trò nh thế nào, nó thuộc dạng nào?

? Biến i có vùng giá trị nằm trong
khoảng nào?

- HS tho lun xõy dng bi toỏn.
- GV nhận xét, đa ra nội dung
thuật tốn để HS quan sát, tìm hiểu cu
trỳc ca chng trỡnh

sang mảng B.

* Ta tiến hành chuyển các phần tử ở mảng
A sang mảng B theo vị trí các phần tử.

* Thuật toán:

Program Chep-mang;

Var A,B:Array[1..30]of Integer;
i:Integer;

Begin

(Nhập dữ liệu cho mảng)

Writeln(' Vào dữ liƯu cho m¶ng');
For i:=1 to 30 do

Begin

Write('A[',i,']=');
Readln(A[i]);

End;

(Chuyển dữ liệu từ mảng A sang mảng B)

For i:=1 to 30 do
B[i]:=A[i];
End.

2/ Tìm phần tử nhỏ nhất của mảng.

Vd: A={3,5,8,2,9,10} Tìm Min(A).

* Để tìm phần tử nhỏ nhất của mảng, Lấy
một phần tử A[1] là phần tư nhá nhÊt.
§em so sánh với các phần tử trong mảng.
-Nếu Min thoả mÃn thì Min là phần tử nhỏ
nhất.

- Ngc li gỏn Min là phần tử vừa tìm đợc.
* Thuật tốn:

Program Tim-Min;

Var A:Array[1..30]of Integer;
I,Min:Integer;

Begin

(Nhập dữ liệu cho mảng)

Writeln(' Vào dữ liệu cho mảng);
For i:=1 to 30 do

Begin

Write('A[',i,']=');
Readln(A[i]);

End;

(T×m Min cua m¶ng)

Min:=A[1];

</div>
(30)<div class='page_container' data-page=30>

For i:=2 to 30 do

If Min<A[i] then Min:=A[i]

(In ra Min)

Writeln(' Giá trị nhỏ nhất là:', Min);
End.

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về các thao tác xây dựng hai thuật
toán trên.

- Cho một vài HS nói lại ý nghĩa một số câu lệnh trong thuật toán.

5. Hớng dẫn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhà theo nội dung vở ghi.

Bài tập:

Viết chơng trình: Đọc, xuất, gán mảng cho nhau.

Viết chơng trình: Tìm Max, hiển thị giá trị Min, Max trong mảng

</div>
(31)<div class='page_container' data-page=31></div>
(32)<div class='page_container' data-page=32></div>
(33)<div class='page_container' data-page=33>

tiÕt 14 :

cÊu tróc chung của một chơng trình tp

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc chung của một chơng trình Turbo Pascal.
- Hiểu đợc các thành phần của một chơng trình TP đơn. giản.
- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Trình bày khái niệm về mảng, ?

?Trình bày cách khai báo mảng 1 và nhiều chiều.

3. Dạy- học bài mới.

Hot ng của thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về cấu trúc

cđa mét ch¬ng tr×nh TP

- GV: Bật mạng Netop Scholl,
giới thiệu một chơng trình đã đợc
chuẩn bị trớc.

- HS quan sát, trả lời các câu
hỏi.

?Một chơng trình TP gåm mÊy
phÇn?

- HS quan sát trả lời câu hỏi,
xây dựng bài.

- GV nhn xột a ra kết luận
Hoạt động 2: Tìm hiểu phần tiêu đề
của một chơng trình TP.

1/ CÊu tróc:

- Một chơng trình TP đơn giản gồm 3
phần

+ Phần tiêu đề.
+ Phần khai bỏo.

+ Phần thân chơng trình

2/ Phn tiờu .

- Đợc sử dụng để đặt tên cho chơng

</div>
(34)<div class='page_container' data-page=34>

GV: Giới thiệu phần tiêu đề của
chơng trình TP trên mạng Netop
Scholl để HS quan sát.

? Tên của chơng trình có thể

đặt theo qui tắc nào

? LÊy vÝ dô

- HS thảo luận xây dựng bài
toán.

- GV nhn xột a ra kt luận.
Hoạt động 3: Tìm hiểu phần khai
báo của chơng trình.

- GV ®a ra mét vµi vÝ dụ về
phần khai báo cho chơng tr×nh TP

- GV ? Các đối tợng đợc khai
báo tuõn theo trỡnh t no?

? Yêu cầu học sinh nhắc lại các
khái niệm:

? Unit
? Const
? Type.
? Var

? Procedure
? Function

Lấy vÝ dơ vỊ các thành phần
khai báo.

- HS tho luận trả lời câu hỏi.
- GV nhận xét, đa ra cấu trúc và
ví dụ về các đối tợng khai báo.

Hoạt động 4: Tìm hiểu phần thân
chơng trình TP

- Giáo viên giới thiệu phần than
của một chơng trình cụ thể.

- ?Trong phần thân của chơng
trình các em thấy bao gồm những gì?

- HS thảo luận, trả lời.

- GV nhận xét, đa ra kết luận.

trình.
- Cấu trúc:

Program <Tên chơng trình>

- Trong đó:

+ Program: Tõ kho¸.

+ Tên chơng trình: Đặt theo qui
tắc đặt tên trong TP

VÝ dơ:

Program Tim_Min;
Program Tim_Max.

3/ PhÇn khai b¸o:

- Khai báo các Unit, hằng, biến, kiểu dữ
liệu mới, chơng trình con, hàm…sẽ đợc
sử dụng trong chơng trình.

- Cấu trúc khai báo các đối tợng:
USES:Khai báo Unit
CONST:Khai báo hằng

TYPE:Khai báo kiểu dữ liệu mới
do ngời dùng định nghĩa

VAR:Khai báo các biến

PROCEDURE:Khai báo chơng
trình con

FINCTION:Khai báo hàm
Ví dụ:

Program Tim_Max;
Uses WinCrt;

Const n=4,m=5;

Type A:Array[1..n]of Integer;
Var x,y,i,j,max:Integer;

B,C:A;

4/ Phần thân chơng trình.

- Phn thõn ca chng trỡnh bao giờ cũng
đợc đặt giữa hai từ khoá BEGIN v

END.

- Phần này chứa tập hợp các lệnh vào ra
dữ liệu, các câu lệnh tính toán, các hàm,
các thủ tục có sử dụng trong chơng trình

4. Củng cố, luyện tập:

</div>
(35)<div class='page_container' data-page=35>

- Giáo viên khắc sâu kiến thức cho học sinh về cấu trúc của một chơng trình
TP.

- Lấy ví dụ cụ thể một chơng trình Tim_Min, Tim_Max, để HS chỉ ra các
phần của một chơng trình TP.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tập:

Xây dựng cấu trúc chơng trình:
Tim_Min, Tim_Max,
Đọc mảng. xuÊt m¶ng.
tiÕt 15 :

các câu lệnh đơn khai báo,gán
các phép toán trên các biến

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc một số câu lệnh khai báo của một chơng trình Turbo Pascal.
- Hiểu c phộp toỏn gỏn.

- HS biết áp dụng vào từng bài toán cụ thể.

- Giỏo dc hc sinh cú thỏi hc tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bài cũ:

? Trình bày cấu trúc một chơng trình TP gồm mấy phần, ?
?Trình bày các phần của một chơng trình TP..

3. Dạy- học bài mới.

Hot ng ca thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về một số câu

lệnh đơn sử dụng để khai báo.

1/ Các câu lệnh đơn khai bỏo.

*USES:Khai báo Unit

</div>
(36)<div class='page_container' data-page=36>

- GV: Bật mạng Netop Scholl, giới
thiệu một các câu lệnh khai báo trong
ch-ơng trình TP.

- HS quan sát, lấy các ví dụ về
- HS thảo luận xây dựng bài toán.
- GV nhận xét đa ra kết luận.

?Khai báo Unit
?Khai báo Const
?Khai báo Type.
? Khai b¸o Var

?Khai b¸o Procedure
?Khai b¸o Function

- HS th¶o ln lÊy vÝ dơ.

- GV nhận xét, đa ra cấu trúc và ví
dụ về các đối tợng khai báo.

Hoạt động 4: Tìm hiểu câu lệnh gán.
- Giáo viên giới thiệu ví dụ thể
hiện câu lnh gỏn.

- ?Thế nào là phép gán.

-? Lấy một vài ví dụ về phép gán

- HS thảo luận, trả lời.

- GV nhËn xÐt, ®a ra kÕt ln.

- CÊu tróc: USES <c¸c unit sư dơng>
- VÝ dơ:

USES Crt; (giao tiếp giữa ngời và máy
tình)

USES Print; (sư dơng xuất dữ liệu ra
máy in)

* CONST:Khai báo hằng

- Cấu trúc: CONST <Tên hằng=giá trị>;
- Ví dụ:

CONST n=8;m=10;

* TYPE:Khai báo kiểu dữ liệu mới do
ng-ời dùng định nghĩa

- CÊu tróc: TYPE <kiĨu d÷ liƯu míi>
- VÝ dơ:

TYPE Mang:Array¬1..100]of (0,1);

* VAR:Khai báo các biến

- Cấu trúc: Var Tên biến: KiĨu biÕn;
- VÝ dơ:

Var n,m,i,j,max: Integer;
B,C,A: Mang;

* PROCEDURE:Khai báo chơng trình
con.

- PROCEDURE <Tên chơng trình con>;
- Ví dụ:

PROCEDURE Tinh_tong;
* FUNCTION:Khai báo hàm

- Cấu trúc: FUNCTION <Ten hàm: Kiểu
hàm>;

- Ví dụ:

Function SoNT(x:Integer):Boolean;

2/ Câu lệnh gán:.

- Lệnh gán một giá trị, kết quả của biểu
thức tính toán cho biến.

- Cú pháp:

< Biến> := <Giá trị, biểu thøc…>
- VÝ dô:

Tong:= Tong+i;
x1 :=

b
a

  ; x

2 :=

b
a



</div>
(37)<div class='page_container' data-page=37>

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về cách khai báo, sử dụng một số
câu lệnh khai báo trong TP.

- Yêu cầu HS lấy ví dụ khác.

5. Hớng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tËp:

Lấy ví dụ về các câu lệnh đơn trong khai báo, gán.
tiết 16 :

các câu lệnh đơn khai báo,gán
các phép toán trên các biến

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ môc tiªu:

- HS: Nắm đợc một số phép tốn trên các biến sử dụng trong một chơng trình
Turbo Pascal.

- HiĨu, lÊy vÝ dơ cho phÐp to¸n víi biÕn.
- HS biÕt ¸p dụng vào từng bài toán cụ thể.

- Giỏo dc hc sinh có thái độ học tập tự giác, tích cực.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tỉ chøc giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Trình bày , lấy ví dụ về một số câu lệnh dùng để khai báo ?
?Trình bày, lấy vị dụ minh hoạ cho câu lnh gỏn?.

3. Dạy- học bài mới.

Hot ng ca thy v trị Nội dung kiến thức cần đạt

Hoạt động 1:Tìm hiểu v mt s phộp

toán số học sử dụng trên biến

1/ C¸c phÐp to¸n sè häc.

* PhÐp céng:

</div>
(38)<div class='page_container' data-page=38>

- GV: Bật mạng Netop Scholl, giới
thiệu một số các phép to¸n sè häc.

- HS quan s¸t, lÊy c¸c vÝ dơ minh
hoạ cho các phép toán:

?Phép cộng.
?Phép trừ.
?Phép nhân.
? Phép chia.

- HS th¶o ln lÊy vÝ dơ.

- GV nhận xét, đa ra cấu trúc và ví
dụ về các đối tợng khai báo.

Hoạt động 2: Tìm hiểu một số phộp
toỏn khỏc ỏp dng trờn bin

- Giáo viên giới thiƯu có ph¸p, mét
sè vÝ dơ thĨ hiƯn cho các phép toán khai
căn.. phép toán so sánh.

- HS thảo luận, trả lời.

- GV nhận xét, đa ra kết ln.

- Có ph¸p:

BiÕn nhí:= biĨu thøc 1+biĨu thức 2+
- Ví dụ:Tính tổng của 5,9 gán vào biến Tg

Tg:=5+9;
*PhÐp trõ:
- Có ph¸p:

BiÕn nhí:=biĨu thøc 1-biĨu thøc 2 - …
- VÝ dơ: TÝnh hiƯu cđa 9,5 lu vào biến H

H:=9-5;
* Phép nhân:
- Cú pháp:

BiÕn nhí:=biĨu thøc 1 * biĨu thøc 2 *…
- VÝ dơ: TÝnh tÝch cđa 9,5 lu vµo biÕn Tc

Tc:=9*5;
* PhÐp chia:
- Có ph¸p:

BiÕn nhí:=biĨu thøc 1 / biểu thức 2
-Ví dụ: Tính thơng 9,5 lu vào biến Th

Th:= 9/5;

2/ Các phép toán khác:.

* Khai căn:
- Cú pháp:

Biến nhớ:= SQRT(biểu thức);

- Ví dụ: Khai căn cđa 25 lu vµo biÕn Ca
Ca:= SQRT(25);

* Lấy giá trị tuyệt đối:
- Cú pháp:

BiÕn nhí:=ABS(sè);

- Ví dụ: Lấy giá trị tuyệt đối của 3 và -23
GT:=ABS(3) -> Kq=3;

GT:=ABS(-23); -> Kq=23;
* PhÐp to¸n so s¸nh:

- Ta có thể sử dụng đợc các phép tốn so
sánh trên biến:

- Có ph¸p:

BiÕn 1 (so s¸nh víi) BiÕn 2

-VÝ dơ: n>m;

n>0;
n<100;

</div>
(39)<div class='page_container' data-page=39>

4. Cđng cè, lun tập:

- Giáo viên khắc sâu kiến thức cho học sinh về các phép toán có thể sử dụng
trên biến nh:

+ PhÐp to¸n sè häc.
+ PhÐp to¸n so s¸nh…

- Yêu cầu HS lấy ví dụ minh hoạ lại các phép toán trên.

5. Hớng dẫn về nhà:

- GV: Hớng dÉn häc sinh häc tËp ë nhµ theo néi dung vở ghi.

Bài tập:

Lấy ví dụ về các các phép toán ¸p dơng trªn biÕn.

NhËn xét Ngày....tháng...năm 2007.

</div>
(40)<div class='page_container' data-page=40>

tiết 17 :

bài thực hành số 1

thực hành về khai báo các kiểu dữ liƯu

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS ôn tập lại kiến thức về:

+ Cỳ phỏp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chn bÞ tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Có mấy kiểu dữ liệu chuẩn đợc sử dụng trong TP, trình bày cụ thể?
?Nêu cú pháp khai báo các kiểu dữ liệu chuẩn?

3. D¹y- häc bµi míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Thông báo nhiệm vụ:

- GV: Bật máy, mạng Netop
School giíi thiƯu mét sè cÊu tróc, có
ph¸p vỊ c¸c lƯnh khai b¸o c¸c kiểu dữ
liệu chuẩn

GV? Yêu cầu h/s nhắc lại một số
kiểu d÷ liƯu chn.

+KiĨu sè
+KiĨu ký tù.
+KiĨu Logic

Hoạt động 2: u cầu đạt đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sẵn để h/s quan sát.

1. Néi dung thùc hµnh

- Khởi động máy tính, phần mềm Turbo
Pascal.

- Thùc hiƯn khai b¸o các kiểu dữ liệu chuẩn
sử dụng trong Turbo Pascal

- áp dụng vào viết một bài tốn cụ thể có
sử dng kiu d liu ú.

+ Bài toán nhân, chia, cộng, trừ 2 số.
+ Bài toán tìm Min, Max của mảng.

2. Yêu cầu:

- Khi ng Turbo pascal.

- Thực hiện các lệnh khai báo các kiểu dữ
liệu chuẩn trong TP

</div>
(41)<div class='page_container' data-page=41>

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai báo, sử dụng đúng kiểu dữ
liệu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hành theo 
nhóm.

- GV: Chia nhóm thực hành, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực
hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hành cđa häc
sinh.

- ViÕt bµi tËp sư dơng c¸c câu lệnh khai
báo trên.

3. Bài tập:

3.1 Viết ra các câu lệnh khai báo kiểu số.
3.2 áp dụng làm các bài tập sau:

+ Tìm Max của mảng số nguyên A
+ Tìm Min của mảng số thùc B
+ TÝnh tÝch cđa m¶ng A.

+ TÝnh tỉng của mảng B.

+ Tìm các phÇn tư trong mảng A
chia hết cho 3 và 5.

+ Tìm phần tử âm trong mảng B .

4. Củng cố, luyện tËp:

- Giáo viên cho một vài h/s thực hiện và chạy bài thực hành.
- GV nhận xét, rút kinh nghiệm bài thực hành của các nhóm.
- GV nhận xét, đánh giá cho điểm bài thực hành.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
- Lµm tiÕp bµi thùc hµnh.

- Chuẩn bị thực hành.
tiết 18 :

bài thực hành số 1

thực hành về khai báo các kiểu dữ liệu

NS: / / 8A 8B 8C 8D

NG:.../
../

I/ mục tiêu:

- HS ôn tập l¹i kiÕn thøc vỊ:

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái độ học tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.

</div>
(42)<div class='page_container' data-page=42>

- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giê d¹y.

1. Tỉ chøc:

Líp 8A 8B 8C 8D

SÜ sè
2. KiĨm tra bµi cị:

? Có mấy kiểu dữ liệu chuẩn đợc sử dụng trong TP, trình bày cụ thể?
?Nêu cú pháp khai bỏo cỏc kiu d liu chun?

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Thông báo nhiệm vụ:

- GV: Bật máy, mạng Netop
School giíi thiƯu mét sè cÊu tróc, có
ph¸p vỊ c¸c lƯnh khai b¸o c¸c kiĨu dữ
liệu chuẩn

GV? Yêu cầu h/s nhắc lại một số
kiểu dữ liƯu chn.

+KiĨu sè
+KiĨu ký tù.

+KiĨu Logic

Hoạt động 2: u cầu đạt đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sẵn để h/s quan sát.

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai bỏo, sử dụng đúng kiểu dữ
liệu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hành theo 
nhóm.

- GV: Chia nhóm thực hành, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực
hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hành của häc

1. Néi dung thùc hµnh

- Khởi động máy tính, phần mềm Turbo
Pascal.

- Thùc hiƯn khai b¸o các kiểu dữ liệu chuẩn
sử dụng trong Turbo Pascal

- áp dụng vào viết một bài tốn cụ thể có
sử dng kiu d liu ú.

+ Bài toán nhân, chia, cộng, trừ 2 số.
+ Bài toán tìm Min, Max của mảng.

2. Yêu cầu:

- Khi ng Turbo pascal.

- Thực hiện các lệnh khai báo các kiểu dữ
liệu chuẩn trong TP

- ViÕt bµi tËp sư dụng các câu lệnh khai
báo trên.

3. Bài tập:

3.1 Viết ra các câu lệnh khai báo kiểu ký
tự, logic.

3.2 áp dụng làm các bài tập sau:

Viết chơng trình nhập vào 2 xâu ký tự S1
và S2.

+ m di ca xâu 2 xâu ký tự
+ Ghép hai xâu lại thành 1 sâu

+ Cắt bớt xâu S1 để đợc 1 xõu mi
S3

+ Chèn xâu S3 vào giữa xâu S2.

</div>
(43)<div class='page_container' data-page=43>

sinh. + Tìm các ký tự giống nhau trong 2
xâu S1 và S2.

4. Củng cố, luyện tập:

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

- Lµm tiÕp bµi thùc hµnh.

- ChuÈn bị thực hành.
tiết 19 :

các câu lệnh rẽ nhánh
Ifthen - case …of

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh If…then để rẽ nhánh
chơng trình

- Hiểu, lấy ví dụ đợc câu lệnh điều kiện
- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tích cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KiĨm tra trong bµi học.

3. Dạy- học bài mới.

Hot ng ca thy v trũ Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh rẽ

nh¸nh Ifthen

- GV: Bật mạng Netop Scholl, giới

1/ Câu lệnh rẽ nhánh: IFThen
a/ Cấu trúc.

IF (Điều kiện) THEN

</div>
(44)<div class='page_container' data-page=44>

thiệu mét sè c¸c vÝ dơ cã sư dơng lƯnh rÏ
nh¸nh IF…THEN

- HS quan s¸t có ph¸p lƯnh, c¸ch
thùc hiƯn cđa lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thớch s hot ng ca lnh.

- HS thảo luận trả lời câu hỏi.
- GV nhận xét, ®a ra cÊu tróc c¸ch
thøc thùc hiƯn lƯnh.

-GV cho học sinh mơ tả lệnh bằng
lu đồ thuật tốn

Hoạt động 2: Tìm hiểu một số ví dụ sử
dụng lệnh IF..THEN

- Gi¸o viªn giíi thiƯu mét sè vÝ dơ
cơ thĨ sư dụng câu lệnh rẽ nhánh.

- GV?

?Mun thc hin c phộp chia ta
cần có điều kiện gì?

?Khi b=0 ta kÕt ln ntn?

? Để tìm Max cđa 2 s« ta phải
thực hiện phép toán nào?

? Khi nào a là max, b là max?

- HS thảo luận, trả lời.

- GV nhận xét, đa ra kết luận.

Lệnh 1
ELSE

Lệnh 2;

- Mô tả hoạt động của lệnh:
Lệnh kiểm tra điều kiện

Nếu điều kiện đúng (True) lệnh 1 đợc
thực hiện, ngợc lại nếu điều kiện sai

(False) thì lệnh 2 đợc thực hiện.
=> Chú ý:

- Sau từ khố ELSE khơng đợc dùng
dấu (;)

- NÕu sau tõ kho¸ THEN vµ ELSE

muốn thực hiện nhiều lệnh thì nhóm lệnh
đó phải đợc đặt trong 2 từ khố BEGIN và

END;

- Có thể khơng sử dụng từ khố ELSE.
b/ Mơ tả lệnh IF…THEN bằng lu đồ:

2/ Một số ví dụ:

2.1 Viết đoạn chơng trình con thực hiện
phép toán chia a cho b.

If b<>0 then thuong:=a/b;
Else

Writeln(‘ Khong thuc hien duco
phep chia cho so 0);

2.2 Viết đoạn chơng trình tìm Max của 2
số a,b.

If a>b then

Writeln(‘ Gia tri lon nhat la :’,a)
Else

Writeln(‘ Gia tri lon nhat la :,b);

đ 44

Begi
n

Điều
kiện

Lệnh 1 Lệnh 2

End

</div>
(45)<div class='page_container' data-page=45>

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh rÏ nh¸nh
+ Cã tõ kho¸ ELSE

+ Khi thùc hiƯn nhiỊu lệnh một lúc.

- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Hớng dẫn về nhà:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo nội dung vở ghi.

Bài tập:

Viết chơng trình con thực hiện các việc sau:
19.1 Tìm thơng của x và y;

19.2 Tìm Max, Min cña a,b;

19.3 Đổi đơn vị đo từ độ C sang F

---tiết 20 :

các câu lệnh rẽ nh¸nh
If…then - case …of

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh CASE…OF để rẽ
nhánh chơng trình

- Hiểu, lấy ví dụ đợc câu lệnh điều kiện

- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giác, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Nêu cấu tróc lƯnh IF…THEN, lÊy vÝ dơ?

</div>
(46)<div class='page_container' data-page=46>

? Vẽ lu đồ mơ tả lệnh IF…THEN?
? Bài tập: 19.1;19.2;19.3.

3. D¹y- häc bµi míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh rẽ

nh¸nh Case…of

- GV: Bật mạng Netop Scholl, giới
thiệu một số các ví dụ cã sư dơng lƯnh rÏ
nh¸nh CASE…OF

- HS quan s¸t có pháp lệnh, cách
thực hiện của lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thớch sự hoạt động của lệnh.

- HS th¶o luËn tr¶ lêi câu hỏi.
- GV nhận xét, đa ra cấu trúc cách
thức thùc hiƯn lƯnh.

Hoạt động 2: Tìm hiểu một số ví d s
dng lnh CASEOF

- Giáo viên giới thiệu một số ví dụ
cụ thể tính số ngày của một tháng bất kỳ
sử dụng câu lệnh rẽ nhánh.

- GV?

?Những tháng nào có 30 ngày?
?Những tháng nào có 31 ngày?
?Có phải tháng 2 nào cũng có 28
ngày?

?Thế nào là năm nhuận?

- HS thảo luận, trả lời.

- GV nhận xét, đa ra kết luận.

1/ Câu lệnh rẽ nhánh: Caseof
a/ Cấu trúc.

CASE ( biến) OF

Danh sách giá trị 1: Lệnh 1;
Danh sách giá trị 2: Lệnh 2;
Danh sách giá trị 3: Lệnh 3;

Danh sách giá trị n: Lệnh n

ELSE

LƯnh n+1;
END;

- Mơ tả hoạt động của lệnh:

Lệnh kiểm tra biến nếu biến nhận một
trong các giá trị ở các danh sách thì lệnh
t-ơng ứng với danh sách đó đợc thực hiện.
Ngợc lại nếu biến không nhận giá trị nào
trong danh sách thì lệnh n+1 đợc thực
hiện.

=> Chó ý:

- Sau từ khoá ELSE khơng đợc dùng
dấu (;)

- Cã thĨ không sử dụng từ khoá ELSE.

2/ Một sè vÝ dơ:

2.1 Viết đoạn chơng trình con thực hiện
tính số ngày của một tháng bất kỳ đợc
nhập vào từ bàn phím.

CASE thang OF

4,6,9,11: Songay:=30;

2 : IF (nam MOD 4
=0)AND(nam mod 100 <>0) then

Songay:=29

ELSE songay:=28
ELSE songay:=31;

END;

</div>
(47)<div class='page_container' data-page=47>

4. Cñng cè, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh rẽ nhánh
+ Có từ khoá ELSE

+ Khi thực hiện nhiều lệnh một lúc.

- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tập ở nhà theo nội dung vở ghi.

Bài tập:

Viết chơng trình con thực hiện các việc sau:

20.1 Tính số ngày của một tháng, năm bất kỳ nhập vào từ bµn
phÝm

20.2 Viết chơng trình nhập vào giá trị của một số trả lại cho ta cách
đọc số đó.

VÝ dơ: Nhập vào 1 trả lại : Mot;
2 : hai

3 : ba

4 : bon

NhËn xÐt Ngày....tháng...năm 2007.

</div>
(48)<div class='page_container' data-page=48>

tiết 21 :

các câu lệnh lặp
for-while-repeat

NS: / / 9A 9B 9C 9D 9E

NG:.../
../

I/ mục tiêu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh lặp FOR

- Hiểu, lấy ví dụ đợc câu lnh lp.

- HS biết áp dụng vào từng bài toán cơ thĨ.

- Giáo dục học sinh có thái độ học tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Nêu cấu trúc lệnh IF…THEN, lấy ví dụ?
? Nêu cấu trúc lệnh CASE-OF, lấy ví dụ?
? Vẽ lu đồ mụ t lnh IFTHEN?

? Bài tập: 20.1;20.2.

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh lặp

FOR..TO..DO

- GV: Bật mạng Netop Scholl, giới
thiệu một số các ví dụ cã sư dơng lƯnh
lawpj FORR..TO..DO

- HS quan s¸t có ph¸p lệnh, cách
thực hiện của lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thớch s hot ng ca lnh.

- HS thảo luận trả lời câu hỏi.

1/ Câu lệnh rẽ lặp: FOR..TO..DO
a/ Cấu trúc.

FOR biến đk :=gt đầu TO gt cuối DO
 LƯnh ;

Hay:

FOR biÕn ®k:= gt ci DOWNTO Gt
đầu DO

Lệnh;

- Mụ t hot ng ca vũng lp:

Khi một nhóm lệnh đựơc lặp đi lặp lại một
số lần xác định trong chơng trình ta có thể

</div>
(49)<div class='page_container' data-page=49>

- GV nhận xét, đa ra cấu trúc cách
thức thực hiƯn lƯnh.

Hoạt động 2: Tìm hiểu một số ví dụ s
dng lnh FOR..TO..DO

- Giáo viên giới thiệu một số vÝ dơ
cơ thĨ tÝnh tỉng cđa 100 sè tù nhiỊn đầu

tiên.

- GV?

?Để tính tổng cho n sè TN đầu
tiên theo em ta tính ntn?

- HS thảo luận, trả lời.

- GV nhận xét, đa ra kết luận.
Vd2: Viết đoạn chơng trình con tính tổng
cho dÃy sau:

S=1 1 1 1

2 3 10

  

?Để tính tổng này em cú cỏch no
 tớnh nhanh c?

? Tổng này khác tổng tríc ntn?
theo em ta tÝnh ntn?

- HS th¶o ln, tr¶ lêi.

- GV nhËn xÐt, ®a ra kÕt ln.

thay một nhóm lệnh đó bằng một lệnh lặp

có bớc lặp xác định. Lệnh lặp đó ta gọi là
vịng lặp. Ta xét vòng lặp FOR, co hai
dạng:

+ FOR biến đk:=gt đầu TO gt cuối DO
Biến điều khiển đợc tăng tuần tự từ giá trị
đầu đến giá trị cuối và mỗi lần tăng lại
thực hịên lệnh đứng sau DO

+FOR biÕn ®k:=gt cuèi DOWNTO Gt
đầu DO

Biến điều khiển giảm tuần tự từ giá trị
cuối về giá trị đầu, mỗi lần giảm lại thực
hiện lệnh sau DO mét lÇn.

=> Chó ý:

- Sau từ khoá DO ta chỉ thực hiện đợc
một lệnh, muốn thực hiện một nhóm lệnh
ta phải đa nhóm lệnh đó vào trong
Begin…End;

2/ Một số ví dụ:

2.1 Viết đoạn chơng trình con thực hiện
tính tổng của 100 số tự nhiên đầu tiên

Procedure Ttong;

Var i,Tg:Longint;
Begin

Tg:=0;

For i:=1 to 100 do
Tg:=Tg+i;
End;

2.2 Viết đoạn chơng trình con thực hiện
tính tổng cho dÃy sau:

S=1 1 1 1

2 3 10

  

Procedure Tday;

Var i:Integer;
Tong:Real;
Begin

Tong:=0;

For i:=10 downto 1 do
Tong:= Tong+1/i;

Writeln(‘ Tong la:’, Tong:6:2);

</div>
(50)<div class='page_container' data-page=50>

End;

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh lặp, khi thực hiện nhiều
lệnh một lúc sau DO

- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Hớng dẫn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhà theo nội dung vở ghi.

Bài tập:

Viết chơng trình con thùc hiƯn c¸c viƯc sau:

21.1 TÝnh tỉng cđa n sè tự nhiên bất kỳ nhập từ bàn phím.
21.2 Viết chơng tr×nh tÝnh tỉng sau:

1 1 1

3 5

1 1 1

2 4

a

n
b

n



---tiết 22 :

các câu lƯnh lỈp
for-while-repeat

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh lặp WHILE

- Hiểu, lấy ví dụ đợc cõu lnh lp.

- HS biết áp dụng vào từng bài to¸n cơ thĨ.

- Giáo dục học sinh có thái độ hc tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

</div>
(51)<div class='page_container' data-page=51>

2. Kiểm tra bài cũ:

? Nêu cấu trúc lệnh lặp FOR, lấy ví dụ?
? Bài tập: 21.1;21.2.

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh lặp

WHILE .. DO

- GV: Bật mạng Netop Scholl, giới
thiệu một số các vÝ dơ cã sư dơng lƯnh
lawpj FORR..TO..DO

- HS quan s¸t cú pháp lệnh, cách
thực hiện của lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thích sự hoạt động của lệnh.

- HS th¶o ln tr¶ lời câu hỏi.
- GV nhận xét, đa ra cấu trúc c¸ch
thøc thùc hiƯn lƯnh.

Hoạt động 2: Tìm hiểu một số vớ d s
dng lnh WHILE..DO

- Giáo viên giới thiệu ví dụ cụ thể
tìm 50 số tự nhiền đầu tiên cùng chia hÕt
cho 5 vµ 7

- GV?

?Mn kiĨm tra tÝnh chia hÕt ta sư
dơng lƯnh nµo?

? Chia hÕt cho 5 vµ 7 ta cã thể
kiểm tr luôn với số nào?

- HS thảo luận, trả lời.

- GV nhận xét, đa ra kết luận.

Vd2: Vit đoạn chơng trình con tìm số n
để:

S=1 1 1 1

2 3 n

1/ Câu lệnh rẽ lặp: WHILE..DO
a/ CÊu tróc.

WHILE biĨu thøc boolean DO
 LƯnh ;

- Mơ tả hoạt động của vịng lặp:

Lệnh kiểm tra điều kiện đứng sau WHILE
và thực hiện lệnh đứng sau DO, khi biểu
thức Boolean còn mang giá trị đúng (True)
thì lệnh cịn đợc thực hiện. Số lần lặp
không đợc xác định trớc.

=> Chó ý:

- Sau từ khoá DO ta chỉ thực hiện đợc
một lệnh, muốn thực hiện một nhóm lệnh
ta phải đa nhóm lệnh đó vào trong
Begin…End;

2/ Một số ví dụ:

2.1 Viết đoạn chơng trình con thực hiện
việc tìm và đa ra màn hình 50 số tự nhiên
đầu tiên chia hết cho 5 và 7.

Procedure Timso;

Var i,dem:Longint;
Begin

Dem:=0;i:=30;

WHILE dem<50 DO

If (i mod 5=0)and(i mod 7=0) then
Begin

Write(i:6);
Inc(dem)
Inc(i);
End;
End;

2.2 Viết đoạn chơng trình con thực hiện
việc tìm số n để dãy:

S=1 1 1 1

2 3 n

   >3

</div>
(52)<div class='page_container' data-page=52>

?Để tính tổng này em có cỏch no
 tớnh nhanh c?

? Tổng này khác tổng trớc ntn?
theo em ta tÝnh ntn?

- HS th¶o luËn, tr¶ lêi.

- GV nhËn xÐt, ®a ra kÕt luËn.

Procedure Timn;

Var i,n:Integer;
Tong:Real;
Begin

Tong:=0;

WHILE Tong<3 DO
Begin

Tong:= Tong+1/i;
Inc(i);

Inc(n);
Begin

Writeln(‘ So n phai tim laf:’, n);
End;

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh lặp WHILE , thực hiện
nhiều lệnh một lúc sau DO

- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tËp:

ViÕt chơng trình con thực hiện các việc sau:

22.1 Cho s tiền x gửi vào ngân hàng với lãi xuất h tìm số tháng cần
thiết để thu đợc số tiền y. x,h,y đợc nhập từ bàn phím.

</div>
(53)<div class='page_container' data-page=53>

tiÕt 23 :

các câu lệnh lặp
for-while-repeat

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh lặp REPEAT

- Hiểu, lấy ví dụ đợc câu lệnh lặp.

- HS biÕt ¸p dụng vào từng bài toán cụ thể.

- Giỏo dc hc sinh có thái độ học tập tự giác, tích cực.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tỉ chøc giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

? Nêu cấu trúc lệnh lặp WHILE, lấy ví dụ?
? Bài tập: 22.1.

3. Dạy- học bµi míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh lặp

REPEAT..UNTIL

- GV: Bật mạng Netop Scholl, giới
thiệu một số các ví dụ có sử dụng lệnh
lặp REPEATUNTIL

- HS quan sát cú pháp lệnh, cách
thực hiện của lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thớch sự hoạt động của lệnh.

- HS th¶o luËn tr¶ lêi câu hỏi.
- GV nhận xét, đa ra cấu trúc cách

thức thực hiện lệnh.

1/ Câu lệnh rẽ lặp: REPEAT..UNTIL
a/ Cấu trúc.

REPEAT
 LÖnh 1 ;

LÖnh 2;
.

……

LÖnh n;

UNTIL ®iỊu kiƯn=true;

- Mơ tả hoạt động của vịng lặp:

Vịng lặp thực hiện các lệnh đứng sau
REPEAT sau đó kiểm tra điều kiện. Nếu
điều kiện đúng thì thốt khỏi vòng lặp,
nếu điều kiện sai thì lại quay lại thực hiện

</div>
(54)<div class='page_container' data-page=54>

Hoạt động 2: Tìm hiểu một số ví dụ sử
dụng lnh REPEAT

- Giáo viên giới thiệu ví dụ cụ thể
việc tìm số n thoả mÃn S>4;

- GV?

Vòng lặp kiÓm tra biÕn Tg khi
biến Tg cha vợt quá 4 thì tăng giá trị i và
làm lại tính toán. Khi vòng lặp kiểm tra
nếu Tg vợt qua 4 thì dừng vòng lặp in ra
kết quả.

Vd2: Vit on chng trỡnh con tìm số n
để:

S=1. . . .1 1 1

2 3  n >3

- GV nhËn xÐt thuËt to¸n.

Khi giá trị của biến Tich nếu Tich cha lớn
hơn 3 thì tiếp tục tăng giá trị i và biến
đếm. Khi giá trị biến Tich vợt q 3 thì
dừng vịng lặp in ra giá trị số n.

c¸c lƯnh .

Số lần lặp khơng đợc xác định trớc.

2/ Mét sè vÝ dô:

2.1 Viết đoạn chơng trình con thực hiện

việc tìm số n để :

S=1 1 1 1

2 3 n

   >4

Procedure Timson;

Var i,dem:Longint;
Tg:Real;
Begin

Dem:=0;i:=1;Tg:=0;
REPEAT

Tg:=Tg+1/i
I:=i+1;

Dem:=Dem+1;
UNTIL Tg>4;

Writeln(‘ So n phai tim la:’,Dem);
End;

2.2 Viết đoạn chơng trình con thực hiện
việc tìm số n để dãy:

S=1. . . .1 1 1

2 3  n >3

Procedure Timson;

Var i,dem:Longint;
Tich:Real;
Begin

Dem:=0;i:=1;Tich:=0;
REPEAT

Tich:=Tich*1/i
i:=i+1;

Dem:=Dem+1;
UNTIL Tich>3;

Writeln(‘ So n phai tim la:,Dem);
End;

4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh lặp REPEAT .
- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Hớng dẫn về nhà:

</div>
(55)<div class='page_container' data-page=55>

- GV: Híng dÉn häc sinh häc tËp ở nhà theo nội dung vở ghi.

Bài tập:

Viết chơng trình con thùc hiƯn c¸c viƯc sau:

22.1 Cho số tiền x gửi vào ngân hàng với lãi xuất h tìm số tháng cần
thiết để thu đợc số tiền y. x,h,y đợc nhập từ bàn phím. Sử dụng vịng lặp
REPEAT..UNTIL.

</div>
(56)<div class='page_container' data-page=56>

tiÕt 24 :

bµi thùc hµnh sè 2

thùc hành về các câu lệnh rẽ nhánh, lệnh lặp

NS: / / 9A 9B 9C 9D 9E

NG:.../
../

I/ mục tiêu:

- HS ôn tËp l¹i kiÕn thøc vỊ:

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái độ hc tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bài cũ:

? Trình bày cấu trúc và mô tả cách thực hiện các câu lệnh lặp?

?Nờu cỳ cu trỳc v mô tả cách thức hoạt động của câu lệnh rẽ nhỏnh?

3. Dạy- học bài mới.

Hot ng ca thy v trũ Nội dung kiến thức cần đạt
Hoạt động 1:Thông báo nhiệm vụ:

- GV: BËt m¸y, m¹ng Netop
School giíi thiÖu mét sè cÊu tróc, có
ph¸p vỊ c¸c lƯnh khai báo các kiểu dữ
liệu chuẩn

GV? Yờu cu h/s nhc lại thao tác
khởi động, cấu trúc chung của một 
ch-ơng trỡnh TP?

+Khai báo.

+Thủ tục, chơng trình con

Hot ng 2: Yờu cầu đạt đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã

1. Néi dung thùc hµnh

- Khởi động máy tính, phần mềm Turbo
Pascal.

- Thực hiện lập trình để giải các bài tốn cụ
thể nh ó cho trong cỏc vớ d c th.

2. Yêu cầu:

- Khởi động Turbo pascal.

- Thực hiện lập trình và chạy các chơng
trình trên máy, ghi và nhận xét kế quả đạt

</div>
(57)<div class='page_container' data-page=57>

đợc chun b sn h/s quan sỏt.

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai bỏo, s dng ỳng kiểu dữ
liệu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hành theo 
nhóm.

- GV: Chia nhãm thùc hµnh, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực

hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hành của học
sinh.

3. Bài tập:

19.4 Tìm Max, Min của a,b;

20.3 Tính số ngày của
một tháng, năm bất kỳ nhập vào từ
bàn phím

19.5 Viết chơng trình nhập vào giá trị của
một số trả lại cho ta cách đọc của số
đó.

21.2 ViÕt chơng trình tính tổng sau:

1 1 1

3 5

1 1 1

2 4

a

n
b

n

   




4. Cđng cè, lun tËp:

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
- Lµm tiÕp bµi thùc hµnh.

Nhận xét Ngày....tháng...năm 2007.

---tiết 25:

bài thực hành số 2

thực hành về các câu lệnh rẽ nhánh, lệnh lặp

NS: / / 9A 9B 9C 9D 9E

NG:.../
../

I/ mục tiêu:

- HS ôn tập lại kiến thức về:

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.

</div>
(58)<div class='page_container' data-page=58>

+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái độ học tập t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

? Trình bày cấu trúc và mô tả cách thực hiện các câu lệnh lặp?

?Nờu cỳ cu trỳc v mụ t cách thức hoạt động của câu lệnh rẽ nhánh?

3. D¹y- häc bµi míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Thông báo nhiệm vụ:

- GV: BËt m¸y, m¹ng Netop

School giíi thiƯu mét sè cÊu tróc, có
ph¸p vỊ c¸c lƯnh khai b¸o các kiểu dữ
liệu chuẩn

GV? Yờu cu h/s nhc li thao tác
khởi động, cấu trúc chung của một 
ch-ơng trình TP?

+Khai báo.

+Thủ tục, chơng trình con

Hot ng 2: Yờu cu t đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sẵn để h/s quan sát.

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai bỏo, s dụng đúng kiểu dữ
liệu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hành theo 
nhóm.

1. Néi dung thùc hµnh

- Khởi động máy tính, phần mềm Turbo
Pascal.

- Thực hiện lập trình để giải các bài tốn cụ
thể nh đã cho trong các ví dụ cụ th.

2. Yêu cầu:

- Khi ng Turbo pascal.

- Thc hiện lập trình và chạy các chơng
trình trên máy, ghi và nhận xét kế quả đạt
đợc.

3. Bµi tËp:

22.1 Cho số tiền x gửi vào ngân hàng với
lãi xuất h tìm số tháng cần thiết để thu đợc

</div>
(59)<div class='page_container' data-page=59>

- GV: Chia nhãm thùc hành, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực

hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hành của học
sinh.

s tin y. x,h,y đợc nhập từ bàn phím. Sử
dụng vịng lặp While..do

22.1 Cho số tiền x gửi vào ngân hàng với
lãi xuất h tìm số tháng cần thiết để thu đợc
số tiền y. x,h,y đợc nhập từ bàn phím. Sử
dụng vịng lặp REPEAT..UNTIL.

4. Cđng cè, lun tËp:

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
- Lµm tiÕp bµi thùc hµnh.

</div>
(60)<div class='page_container' data-page=60>

tiÕt 26 :

c©u lƯnh write,writeln-read,readln

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh Write và Writeln
Hiểu, lấy ví dụ đợc câu lệnh trên

- HS biÕt ¸p dơng vµo tõng bµi to¸n cơ thĨ.

- Giáo dục học sinh có thái độ học tập tự giác, tích cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KiĨm tra trong giê học.

3. Dạy- học bài mới.

Hot ng ca thy v trũ Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh

Write,Writeln

- GV: Bật mạng Netop Scholl, giới
thiệu một số các ví dụ có sử dụng lệnh
Write, writeln để đa thơng tin ra màn
hình khi chạy chơng trình.

- HS quan s¸t có ph¸p lƯnh, cách
thực hiện của lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thớch s hot ng ca lnh.

- HS thảo luận trả lời câu hỏi.
- GV nhận xét, đa ra cấu trúc cách
thức thực hiện lƯnh.

1/ C©u lƯnh Write,Writeln
a/ CÊu tróc.

Write( Néi dung cần thông báo );

Write(biến cần in ra);

- Mụ t hoạt động của lệnh:

Lệnh Write giúp ta đa thông tin ra màn
hình ( thơng tin có thể là một dịng thơng
báo, một giá trị biến nào đó)

- Thơng tin đợc đa ra màn hình khi chạy
chơng trình đợc đặt trong 2 dấu nháy trên.
VD: Write(‘ Lập trình Pascal’);

Khi chạy chơng trình dịng chữ: Lập trình
Pascal đợc đa ra màn hình.

- Giá trị biến khi đa ra màn hình không
cần đặt trong 2 dấu ngoặc kép.

</div>
(61)<div class='page_container' data-page=61>

Hoạt động 2: Tìm hiểu một số ví về
Write và writeln.

- Giáo viên giới thiệu một số ví dụ
cụ thể để đa thông tin cá nhân ra màn
hình

- HS quan sát, nhận xét
- GV đặt câu hỏi?

? Để đa đợc thơng tin ra màn hình
nh mẫu trên ta sử dụng lệnh nào?

- HS th¶o luËn, trả lời câu hỏi.
- GV nhận xét, đa ra cách làm,

cỏch ci t mó lệnh.

VD: Write(a);

Khi chạy chơng trình thì giá trị của biến a
sẽ đợc đa ra màn hình.

=> Chó ý:

- Để khi đa ra thông tin chơng trình tự

động suống dịng thì ta sử dụng lệnh

Writeln.

2/ Mét sè vÝ dô:

2.1 Viết chơng trình đa ra th«ng tin cá
nhân của mình trên màn hình.

Vd: Họ tên: Nguyễn Văn Anh
Líp: 9A

Trờng THCS Thái Hòa
Program TTCN;

Uses Wincrt;
Begin

Writeln( Họ tên: Nguyễn Văn Anh ):‘ ’

Writeln( Líp: 9A );‘ ’

Writeln( Tr‘ ờng THCS Thái Hòa );

End.
4. Củng cố, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh Write.
+ Write

+ Writeln

- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Hớng dẫn về nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

Bµi tËp:

Viết chơng trình Tp :

1. In ra màn hình thông tin cá nhân của mình?
2. In ra màn hình một khổ thơ?

---tiết 27 :

c©u lƯnh write,writeln-read,readln

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng câu lệnh Read, Readln.

</div>
(62)<div class='page_container' data-page=62>

- Hiểu, lấy ví dụ đợc câu lệnh trên.

- HS biÕt ¸p dụng vào từng bài toán cụ thể.

- Giỏo dc hc sinh có thái độ học tập tự giác, tích cực.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tỉ chøc giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

Nêu cấu trúc, ý nghĩa, sự khác nhau giữa 2 lệnh Write và Writeln?
Làm 2 bài tập ở bài trớc?

3. Dạy- học bài mới.

Hot ng của thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về câu lệnh

Read, Readln

- GV: Bật mạng Netop Scholl, giới
thiệu một số các ví dụ có sử dụng lệnh
Write, writeln để đa thông tin ra màn
hình khi chạy chơng trình.

- HS quan sát cú pháp lệnh, cách
thực hiện của lệnh

-GV?

?Nêu cú pháp lệnh.

?Gii thớch s hot ng ca lnh.

- HS thảo luận trả lời câu hỏi.
- GV nhận xét, đa ra cấu trúc cách
thức thực hiện lệnh.

1/ Câu lệnh Read và Readln
a/ CÊu tróc.

Read;

Read(tªn biÕn);
Readln(tªn biÕn);

- Mơ tả hoạt động của lệnh:

Lệnh Read cho phép ta tạm dừng chơng
trình để xem các bớc chạy chơng trình hay
thao tác nhập dữ liệu vào từ bàn phím cho
biến.

- VÝ dơ:

+ Read: Dừng chơng trình.
+ Read(a): Dừng chơng trình.

Nhập dữ liệu cho biến a
+Readln(a): Dừng chơng trình

NhËp d÷ liƯu cho biÕn a
Xng dßng

=> Chó ý:

- Lệnh Readln ngồi việc dừng chơng
trình, nhập dữ liệu mà sau đó suống dịng

</div>
(63)<div class='page_container' data-page=63>

Hoạt động 2: Tìm hiểu một số ví dụ sử
dụng lnh CASEOF

- Giáo viên giới thiệu một số ví dụ
cụ thể áp dụng lệnh Read và Readln

- GV?

? Để nhập vào các giá trị cho 3
biến a,b,c ta sử dơng lƯnh nµo?

? 3 lƯnh 
Readln(a);
Readln(b);
Readln(c);

Nhằm mục đích gì?

- HS thảo luận, trả lời câu hỏi.
- GV nhận xét và giải thÝch ý

nghÜa tõng c©u lƯnh.

2/ Mét sè vÝ dơ:

2.1 ViÕt ch¬ng trình nhập vào 3 số tự
nhiên a,b,c đa ra màn h×nh tÝch cđa chóng.
Vd: Nhap vao 3 so a,b,c

a= 3
b=4
c=5

TÝch cua chung la: 60

Program TTich;
Uses Wincrt;

Var a,b,c,tich: Longint;
Begin

Writeln( Nhap vao 3 so a,b,c ):‘ ’

Write( a= ); Readln(a);‘ ’

Write( b= ); Readln(b);‘ ’

Write( c= ); Readln(c);‘ ’

Tich:=0;
 Tich:=a*b*c;

Writeln( Tich 3 so la: ,Tich);‘ ’

End.
4. Cđng cè, lun tập:

- Giáo viên khắc sâu kiến thức cho học sinh về câu lệnh Read và Readln;
- Yêu cầu HS lấy ví dụ minh hoạ lại câu lệnh trên..

5. Hớng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ở nhà theo nội dung vở ghi.

Bài tập:

1. Lập trình nhËp vµo tõ bµn phÝm 3 sè a,b,c tÝnh tỉng, hiệu, thơng
của chúng.

tiết 28 :

dữ liệu kiểu file văn bản

NS: / / 9A 9B 9C 9D 9E

NG:.../
../

I/ mục tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng dữ liệu kiểu File văn bản .
- Hiểu đợc khái niệm, định nghĩa, phân loại, cách lấy, đọc dữ liu trong file

văn bản.

- HS biết áp dụng vào từng bài toán cụ thể.

- Giỏo dc hc sinh cú thỏi độ học tập tự giác, tích cực.

</div>
(64)<div class='page_container' data-page=64>

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Học bài cũ.

o Đọc trớc bài mới.

III/ Tiến trình tỉ chøc giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

Nêu cấu trúc, ý nghĩa, sự khác nhau giữa 2 lệnh Read và Readln?
Làm 2 bài tập ở bài trớc?

3. Dạy- học bài mới.

Hot ng của thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về dữ liệu kiểu

File

- GV: Bật mạng Netop Scholl, giới
thiệu một số các ví dụ có sử dụng dữ liệu
kiểu File để HS quan sát

- HS quan s¸t có ph¸p lƯnh, c¸ch
thùc hiƯn cđa lƯnh, ý nghĩa, sự tiện lợi
khi sử dụng dữ liệu kiểu file.

-GV?

?Theo em thế nào là một File?
? Nh vậy dữ liệu kiểu File là dữ
liệu ntn?

?Khi sử dụng dữ liệu kiểu file ta
có thuận lợi gì về dữ liệu?

- HS thảo luận trả lời câu hỏi.
- GV nhận xét, đa ra khái niệm dữ
liệu kiểu file và lấy ví dụ cơ thĨ.

Hoạt động 2: Tìm định nghĩa dữ liệu
kiểu file.

- Giáo viên nêu định nghĩa và cách
khai báo, cấu trúc dữ liệu kiểu file.

HS quan s¸t, ghi nhí.

LÊy vÝ dơ vỊ mét sè kiểu khai báo

1/ Khái niệm:

- File là một tập hợp các dữ liệu có cùng
kiểu, liên quan víi nhau, nhãm lại với
nhau thành một dÃy

- File là một kiểu dữ liệu có cấu trúc.
- Sử dụng dữ liệu kiểu File giúp ta không
phải nhập lại dữ liệu khi chạy chơng trình,
và dữ liệu đợc tính tốn sẽ đợc lu lại ở một
File tiện cho ta xem và quản lý.

-> Xét ví dụ sau để thấy vai trò của dữ
liệu kiểu File. Giả sử ta lập chơng trình để
tính điểm cho học sinh trờng THCS Thái
Hịa. Mỗi lần thử chơng trình ta lại phải
nhập lại dữ liệu cho hơn 600 H/S nh thế
rất rễ nhầm và lâu. Nừu ta sử dụng dữ liệu
kiểu File thì cơng việc đó ta chỉ việc nhp
duy nht 1 ln.

2/ Định nghĩa:

- Mt kiu File vi các phần tử cùng kiểu
đợc định nghĩa trong phần khai báo kiểu
dữ liệu mới sau từ khoá TYPE nh sau:

TYPE Tên kiểu file=File OF Tên kiểu
các phần tư;

</div>
(65)<div class='page_container' data-page=65>

file d÷ liƯu.

HS tập lấy ví dụ về kiểu file dữ
liệu, khai báo và định nghĩa kiểu dữ liệu.

Các phần tử trong kiểu File có thể là kiểu
đơn giản hay có cấu trúc nhng nhất thiết
không phải là kiểu File.

- Biến kiểu File cúng đợc khai báo trực
tiếp trong phần khai báo biến sau từ khố
Var.

VAR Tªn biÕn kiĨu file: File OF Tên
kiểu các phần tử;

Ví dụ:

TYPE (định nghĩa kiểu file)

Fnguyen=FILE OF Integer;
Fthuc=FILE OF Real;

VAR (khai b¸o biÕn file)

F1,F2:Fnguyen;
F3,F4:Fthuc;

4. Cđng cè, luyện tập:

- Giáo viên khắc sâu kiến thức cho học sinh vỊ d÷ liƯu kiĨu file

- HS nắm đợc vai trò, thuận lợi, khái niệm, định nghĩa về kiểu file dữ liệu.
- Yêu cầu HS lấy ví dụ minh hoạ .

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.

---tiÕt 29 :

dữ liệu kiểu file văn bản

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS: Nắm đợc cấu trúc, ý nghĩa, cách sử dụng dữ liệu kiểu File văn bản .
- Hiểu đợc khái niệm, định nghĩa, phõn loi, cỏch ly, c d liu trong file

văn bản.

- HS biết áp dụng vào từng bài toán cụ thể.

- Giáo dục học sinh có thái độ học tập tự giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.

o Soạn, su tầm bài giảng điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Häc sinh:

</div>
(66)<div class='page_container' data-page=66>

o Häc bµi cị.

o Đọc trớc bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bài cũ:

Trình bày khái niệm về dữ liệu kiểu file?

Trỡnh bày định nghĩa, lấy ví dụ về dữ liệu kiểu file?

3. Dạy- học bài mới.

Hot ng ca thy v trũ Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu về cấu trúc dữ

liƯu kiĨu File

- GV: Bật mạng Netop Scholl, giới
thiệu cấu trúc dữ liệu kiểu File để HS
quan sát

- HS quan s¸t cÊu tróc d÷ liƯu kiĨu
file.

-GV? Lấy ví dụ để mơ phỏng dữ
liệu kiểu file sao cho rễ hình dung nhất.

- GV cho học sinh thảo luận lấy ví
dụ minh hoạ.

- GV nhận xét, đa ra cấu trúc và ví
dụ dữ liệu kiÓu file.

Hoạt động 2: Cách phân loại dữ liu
kiu file

- Giáo viên bËt m¹ng Netop nêu
cách phân loại và các loại dữ liệu kiểu
file.

HS quan s¸t, ghi nhí.

1/ CÊu tróc:

- Các phần tử của file khơng có tên mà chỉ
đợc xếp thành một dãy. Tại một thời điểm
chơng trình có thể truy nhập vào một phần
tử của file thông qua giá trị của một biến
đệm. Vị trí đang truy nhập cịn đợc gọi là
cửa sổ của file. Có các lệnh làm dịch
chuyển vị trí của biến đệm tức dịch cửa sổ
sang vị trí khác để lấy giá trị khác của file.

Ta có thể hình dung file nh quận fiml chụp
ảnh, mỗi lần chụp ta chỉ chụp đợc 1 pơ“ ”

sau đó lên phim mới lại chụp tiếp đợc.

-File có đầu file và cuối file, cuối file đợc
định nghĩa bằng từ khố EOF(F) nó báo
cho chơng trình biết khi nào thì cửa sổ file
nằm ở cuối cùng và dng vic truy nhp

vo file.

- Ta có thể mô phòng File nh sau:

EOF(F)
Cưa sỉ ®ang ë ®Çu file

EOF(F)
Cưa sổ ở cuối file

2/ Phân loại:

- Cú hai loi file, tuỳ thuộc vào cách bố trí
các phần tử của file ở bộ nhớ ngồi và từ
đó cũng qui định hai kiểu truy nhập nh
sau:

- Loại 1: File có cấu trúc tuần tự và chỉ cã
kiĨu truy nhËp tn tù. Cơ thĨ mn lÊy ra
mét phần tử ở vị trí bất kỳ thì phải đi qua

</div>
(67)<div class='page_container' data-page=67>

LÊy vÝ dô vÒ mét sè cách truy
nhập vào dữ liệu trong file.

Theo kiểu tuần tự.
Theo kiểu trực tiếp.

- GV nêu các phận loại và cụ thể
các loại dữ liệu kiểu file.

tt c các phần tử đứng trớc nó.

Vdơ: Mn lµm viƯc víi phÇn tư thø 5
trong file thì phải đi qua 4 phần tử trớc
nó.

- Loi 2: Là loại file cho phép ta truy nhập
vào các vị trí trong mảng bằng 2 cách, truy
nhập tuần tự nh trên và truy nhập trực tiếp
tới phần tử đó. Tuy nhiên khi đó các phần
tử phải đợc đánh số vị trí nh là địa chỉ của
nó.

4. Cđng cè, luyÖn tËp:

- Giáo viên khắc sâu kiến thức cho học sinh về dữ liệu kiểu file
- HS nắm đợc cấu trúc, phân loại kiểu file dữ liệu.

- Các truy nhập vào file bằng con đờng tuần tự và con đờng trực tiếp.
- Yêu cầu HS lấy ví dụ minh hoạ .

5. Híng dÉn vỊ nhµ:

- GV: Hớng dẫn học sinh học tập ở nhà theo nội dung vở ghi.
- Yêu cầu hs đọc trớc bài mới.

</div>
(68)<div class='page_container' data-page=68>

tiÕt 30:

kiÓm tra 1 tiÕt

NS:… …/ / 9A 9B 9C 9D 9E

NG:.../
../

I/ mục tiêu:

- HS ôn tập, hệ thống l¹i kiÕn thøc vỊ:

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
+ Đánh giá đợc q trình học tập của học sinh.

- Giáo dục học sinh có thái độ học tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Ti liu, sỏch giỏo khoa.
o Chun b bi.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài kiểm tra.

III/ Tiến trình tổ chức giờ dạy.
1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

Không

3. Dạy- học bài mới.

bi

A: Phần lý thuyết:

Câu 1: Nêu cÊu tróc, ý nghÜa, lÊy vÝ dơ minh ho¹ cho lệnh Read? HÃy phân tích sự
khác nhau giữa Read(a) và Readln(a)?

Câu 2: Nêu cấu trúc, ý nghĩa, lấy ví dụ minh hoạ cho lệnh Write? HÃy phân tích sự
khác nhau giữa lệnh Write(a) và Writeln(a);

B: Bài tập:

Câu 1: Lập trình đa ra màn hình các dòng thông tin về bản thân?

Cõu 2: Lp trỡnh gii bi toỏn tỡm max cho 2 số a,b đợc nhập vào từ bàn phím?
Câu 3: Lập trình để tính tổng cho 50 chữ s t nhiờn u tiờn?

Đáp án
A: Lý thuyết (4 đ)

Câu 1: (2®): - CÊu tróc: Read(biÕn);

- ý nghĩa: Tạm dừng chơng trình để xem, nhập dữ liệu cho biến.
- Ví d: Read(a);

</div>
(69)<div class='page_container' data-page=69>

Read;

- Sự khác nhau giữa Read và Readln là:

+ Read(a): Tạm dừng chơng trình, xem ,nhập dữ liệu.

+ Readln(a): Tạm dừng chơng trình, xem, nhập dữ liệu, xuống dòng.
Câu 2: (2đ): - Cấu trúc: Write(Nội dung dòng thông báo);

Write(bien);

- ý ngha: a mt dũng thơng báo ra màn hình, đa giá trị của một biến
nào đó ra màn hình.

- VÝ dơ: Write(‘ Day la mon tin hoc);
Write(a);

- Sự khác nhau giữa Write(a); và Writeln(a);

Writeln(a) sau khi đa ra màn hình giá trị của biến a thì Writeln còn cho
phép ta xuống dòng.

B: Bài tập (6đ)

Câu 1:

Program TTCN;
Uses Wincrt;
Begin

Writeln( Ten em la: Nguyen Van A’);
Writeln(‘ Hoc sinh lop : 9A’);

Writeln(‘ Truong THCS Thai Hoa’);
End.

C©u 2:

Program TimMax;
Uses Wincrt;

Var Max,a,b:Longint;
Begin

Writeln(‘ Nhap vao 2 so a,b’);
Write(‘a=’);reeadln(a);

Write(‘b=’);reeadln(b);
If a>b then

Max:=a
Else

Max:=b;

Writeln(‘ Gia tri lon nhat trong 2 so ‘,a,’,’,b,’ la:’,Max);
End.

C©u 3:

Program TT;
Uses Wincrt;
Var I,Tg:Longint;

</div>
(70)<div class='page_container' data-page=70>

Begin

Tg:=0;

For i:=1 to 50 do
Tg:=Tg+I;

Writeln(“ Tong cua 50 so tu nhien dau tien la:’,Tg);
End.

4. Cđng cè, lun tËp:

- Giáo viên thu bài, nhận xét, rút kinh nghiệm giờ kiĨm tra.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh về nhà ôn tập.
- Làm tiếp các bài tập.

---tiết 31:

bài thực hành số 3

thực hành giảI toán trên m¸y tÝnh

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS «n tËp l¹i kiÕn thøc vỊ:

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái hc tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bài cũ:

? Trình bày cấu trúc và mô tả cách thực hiện các câu lệnh lặp?

?Nờu cỳ cu trỳc và mô tả cách thức hoạt động của câu lệnh r nhỏnh?

3. Dạy- học bài mới.

Hot ng ca thy v trò Nội dung kiến thức cần đạt

</div>
(71)<div class='page_container' data-page=71>

Hoạt động 1:Thông báo nhiệm vụ:
- GV: Bật máy, mạng Netop

School giới thiệu một số cấu trúc, cú
pháp về các lệnh khai báo các kiểu dữ
liệu chuẩn

GV? Yêu cầu h/s nhắc lại thao tác
khởi động, cấu trúc chung ca mt 
ch-ng trỡnh TP?

+Khai báo.

+Thủ tục, chơng trình con

Hoạt động 2: Yêu cầu đạt đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sn h/s quan sỏt.

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai bỏo, s dng ỳng kiu d
liu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hnh theo 
nhúm.

- GV: Chia nhóm thực hành, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực
hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hành của học
sinh.

1. Nội dung thực hành

- Khởi động máy tính, phần mềm Turbo
Pascal.

- Thực hiện lập trình để giải các bài tốn cụ
thể nh đã cho trong các ví dụ cụ thể.

2. Yêu cầu:

- Khi ng Turbo pascal.

- Thc hiện lập trình và chạy các chơng

trình trên máy, ghi và nhận xét kế quả đạt
đợc.

3. Bµi tËp:

31.1 Tính tổng cho tất cả các số lẻ trong
dãy số từ 1 tới n. Với n đợc nhập vào từ bàn
phím.

32.2 Tính tổng cho tất cả các số chia hết
cho 5 mà không chia hết cho 3 trong dãy số
từ 1 tới n với n đợc nhập vào từ bàn phím

4. Cđng cè, lun tËp:

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
- Lµm tiÕp bµi thùc hµnh.

---tiÕt 32:

bµi thùc hµnh số 3

thực hành giảI toán trên máy tính

</div>
(72)<div class='page_container' data-page=72>

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mục tiêu:

- HS ôn tập lại kiÕn thøc vÒ:

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái độ học tập t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KiĨm tra trong giờ học.

3. Dạy- học bài mới.

Hot ng ca thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Thông báo nhiệm vụ:

- GV: BËt máy, mạng Netop
School giíi thiƯu mét sè cÊu tróc, có
ph¸p về các lệnh khai báo các kiểu dữ
liệu chuẩn

GV? Yờu cầu h/s nhắc lại thao tác
khởi động, cấu trúc chung ca mt 
ch-ng trỡnh TP?

+Khai báo.

+Thủ tục, chơng trình con

Hot động 2: Yêu cầu đạt đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sẵn h/s quan sỏt.

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai bỏo, s dng ỳng kiu d

1. Nội dung thùc hµnh

- Khởi động máy tính, phần mềm Turbo
Pascal.

- Thực hiện lập trình để giải các bài tốn cụ
thể nh đã cho trong các ví d c th.

2. Yêu cầu:

- Khi ng Turbo pascal.

- Thực hiện lập trình và chạy các chơng
trình trên máy, ghi và nhận xét kế quả đạt
đợc.

</div>
(73)<div class='page_container' data-page=73>

liÖu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hành theo 
nhóm.

- GV: Chia nhóm thực hành, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực
hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hành của häc
sinh.

3. Bµi tËp:

32.1 Tính tổng cho tất cả các số lẻ trong
dãy số a1,a2...an. Với ai đợc nhập vào từ bàn

phÝm.

32.2 Tính tổng cho tất cả các số chia hết
cho 5 mà không chia hết cho 3 trong dãy số
a1,a2...an. Với ai đợc nhập vào từ bàn phím.

4. Cđng cè, lun tËp:

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
- Lµm tiÕp bµi thùc hµnh.

---tiÕt 33:

bµi thùc hµnh sè 3

thùc hành giảI toán trên máy tính

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ môc tiêu:

- HS ôn tập lại kiến thức về:

II/ Chn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Chuẩn bị bài thực hành.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

</div>
(74)<div class='page_container' data-page=74>

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KiĨm tra trong giờ học.

3. Dạy- học bài mới.

Hot ng ca thy v trị Nội dung kiến thức cần đạt
Hoạt động 1:Thơng báo nhiệm vụ:

- GV: BËt máy, mạng Netop
School giới thiÖu mét sè cÊu tróc, có
ph¸p vỊ c¸c lệnh khai báo các kiểu dữ
liệu chuẩn

GV? Yờu cu h/s nhắc lại thao tác
khởi động, cấu trúc chung của một 
ch-ng trỡnh TP?

+Khai báo.

+Thủ tục, chơng trình con

Hot ng 2: Yêu cầu đạt đợc của bài
thực hành.

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sẵn để h/s quan sỏt.

- GV: Yêu cầu các tiêu chuẩn về
bài toán

+ Khai báo, sử dụng đúng kiểu dữ
liệu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai báo, hàm, hằng,
biến,…

Hoạt động 3: Học sinh thực hành theo 
nhóm.

- GV: Chia nhóm thực hành, mỗi
nhóm 2->3 h/s

- GV: Đa bài tập thực hành.
- HS thảo luận làm bài thực hành
theo nhóm.

- Yêu cầu học sinh ghi lại bài thực
hành trên máy.

- GV nhận xét hớng dẫn các nhóm
thực hiện bài tập của mình.

- Đánh giá bài thực hµnh cđa häc
sinh.

1. Néi dung thùc hµnh

- Khởi động máy tính, phần mềm Turbo

Pascal.

- Thực hiện lập trình để giải các bài tốn cụ
thể nh đã cho trong cỏc vớ d c th.

2. Yêu cầu:

- Khi động Turbo pascal.

- Thực hiện lập trình và chạy các chơng
trình trên máy, ghi và nhận xét kế quả đạt
đợc.

3. Bµi tËp:

33.1 Nhập vào 3 số a,b,c viết chơng trình
kiểm tra xem đó có phải là số đo 3 cạnh
của một tam giác hay khơng? Và tam giác
đó là tam giác gỡ?

33.2.1 Viết chơng trình giải phơng trình
bậc nhất 1 ẩn.

33.3 Viết chơng trình giải phơng trình bậc
hai.

4. Cđng cè, lun tËp:

</div>
(75)<div class='page_container' data-page=75>

- Giáo viên cho một vài h/s thực hiện và chạy bài thực hành.
- GV nhận xét, rút kinh nghiệm bài thực hành của các nhóm.

- GV nhận xét, đánh giá cho điểm bài thực hành.

5. Híng dÉn vỊ nhµ:

- GV: Híng dÉn häc sinh häc tËp ë nhµ theo néi dung vë ghi.
- Làm tiếp bài thực hành.

---tiết 34

ôn tập học kú

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS ơn tập lại toàn bộ kiến thức trong học kỳ 1 về các phần cơ bản về Turbo
Pascal và một số chơng trình đơn giản.

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.
- Giáo dục học sinh có thái độ học tập tự giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Ti liu, sỏch giỏo khoa.
o Chun cng ụn tp.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KiĨm tra trong giờ học.
3. Dạy- học bài mới.

Hot ng ca thy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Hớng dẫn học sinh ôn tập

theo đề cơng khá quát phần lý thuyết.

- GV: Bật máy, mạng Netop
School giới thiệu một số cấu trúc, cú
pháp về các lệnh khai báo các kiểu dữ
liệu chuẩn, các vòng lặp, các cõu lnh

Đề cơng ôn tập
I. Lý thuyết.

1. Cấu trúc, ý nghÜa, vÝ dơ minh häa cho:
+ LƯnh Read

+ LƯnh Write

</div>
(76)<div class='page_container' data-page=76>

vào ra dữ liệu,

GV? Yêu cầu h/s nhắc lại cú
pháp, ý nghĩa, lấy ví dụ minh hoạ cho
các câu lệnh trên.

+Khai báo.

+Thủ tục, chơng trình con

Hoạt động 2Nội dung ôn tập phần thực
hành

- GV: Đa một số bài tập mẫu đã
đợc chuẩn bị sẵn để h/s quan sỏt.

- GV: Yêu cầu các tiêu chuẩn về

bài to¸n

+ Khai báo, sử dụng đúng kiểu dữ
liệu

+ Viết đúng cú pháp, cách sử
dụng các câu lệnh khai bỏo, hm, hng,
bin,

- Giáo viên gợi ý, giao bài tập cho
học sinh tự làm.

2. Hằng, biến, thủ tục, chơng trình con là
gì? Lấy ví dụ minh hoạ.

3. Mô tả hoạt động, cấu trúc, lấy ví dụ
minh hoạ cho các vịng lặp sau :

+ For to do
+ While.Do
+ Repeat..Until

4. Mô tả, viết cấu trúc, lấy ví dụ minh hoạ
cho các lệnh sau:

+ IF then
+ CaseOf

II. Bài tập:

Lập chơng trình thực hiện các công việc
sau :

34.1 Đa thông tin cá nhân của mình ra màn
hình.

34.2 Tớnh tng cho n ch s tự nhiên liên
tiếp với n đợc nhập vào từ bn phớm

34.3 Tính tổng cho các số thoả man ®iỊu
kiƯn cho tríc.

34.4 T×m min, max cho 2 sè, 3 sè vµ cho
mét d·y nhËp vµo tõ bµn phím.

34.5 Giải phơng trình bậc nhất 1 ẩn.
34.6 Giải hệ phơng trình.

34.7 Giải phơng trình bậc 2.

34.8 Nhp vo 3 số a,b,c kiểm tra xem đó
có phải là số đo 3 cạnh của một tam giác
hay không? Và đó là tam giác gì?

34.9 Viết chơng trình in ra n chữ số nguyên
tố với n đợc nhập từ bàn phớm.

4. Củng cố, luyện tập:

- Giáo viên hớng dẫn học sinh ôn tập phần lý thuyết.

- GV hớng dẫn các em lµm bµi tËp.

5. Híng dÉn vỊ nhµ:

- GV: Hớng dẫn học sinh ôn tập ơt nhà theo nội dung cng thc hnh v lý
thuyt.

- Làm tiếp các bài tập.

</div>
(77)<div class='page_container' data-page=77>

tiết 35

ôn tập học kỳ

NS: …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- HS ơn tập lại tồn bộ kiến thức trong học kỳ 1 về các phần cơ bản về Turbo
Pascal và một số chơng trình đơn giản.

+ Cú pháp khai báo các kiểu dữ liệu sử dụng trong Turbo Pascal.
+ Biết cách viết một chơng trình đơn giản sử dụng các kiểu dữ liệu đó.

- Giáo dục học sinh có thái độ học tập tự giác, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Ti liu, sỏch giỏo khoa.
o Chun cng ụn tp.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

KiĨm tra trong giờ học.
3. Dạy- học bài mới.

Hot ng ca thy v trò Nội dung kiến thức cần đạt

Hoạt động 1:Hớng dẫn học sinh 
ôn tập theo đề cơng..

- GV: Bật máy, mạng Netop
School giới thiệu một số bài tập
mẫu để học sinh quan sát, theo
dõi và tham khảo cách khai bỏo,
phõn tớch bi toỏn v cu trỳc lp
trỡnh.

GV? Đặt câu hỏi?

+Thế nào là sè chia hÕt
cho 5?

+ThÕ nµo lµ sè chia hết
cho 3?và không chia hết cho 3?

- HS th¶o luËn trả lời câu
hỏi.

Một số bài tập mẫu

1. Bài tập 1:

Tính tổng các số chia hết cho 5 mà không chia hết
cho 3 trong đoạn 1..1000

* Phân tích bài toán:

- Với bài toán này ta lần lợt duyệt các số từ 1 tới 1000 nếu
số nào thoả mÃn điều kiện chia hết cho 5 mà không chia hết
cho 3 thì đem cộng vào biến tổng.

* Chơng trình nh sau:
Program bt1;

Uses Wincrt;

Var Tg,I,n: Integer;
Begin

Tg:=0;

For i:=1 to 1000 do

</div>
(78)<div class='page_container' data-page=78>

- GV tỉng kÕt thÕ noµ lµ sè
chia hết cho 5 và không chia hết
cho 3

Hot ng 2 Tìm hiểu bài tốn
duyệt mảng và so sánh

- GV: Đa một số bài tập
mẫu đã đợc chuẩn bị sẵn để h/s
quan sát.

- GV: Phân tích bài tốn
+ Khai báo, sử dụng đúng

kiểu dữ liệu

-GV đặt câu hỏi?

+ ThÕ nào là min, max?
+Để tìm min, max ta thờng
làm ntn?

T đó giáo viên tổng hợp
và đa ra cách xây dựng bài
toán cụ thể với cỏc trng
hp.

- Giáo viên giải thích vì sao
nên sử dụng chơng trình
con.

If (I mod 5=0)and(I mod 3 <> 0) then
 Tg:=Tg+I;

Writeln( Tong can tinh la: ,Tg);‘ ’
End.

2. Bµi tËp 2:

NhËp vµo n sè (n<10) viết chơng trình tìm Max cho
dÃy a1,a2...an trên.

* Phân tích bài toán:

- Bi toỏn I tỡm max, min thc cht là bài toán ta đem làn
lợt các số đem 2 số một so sánh với nhau và từ đó tìm c
Max, min ca dóy s.

* Chơng trình nh sau:
Program Tmax;
Uses Wincrt;

Var A:Array[1..100] of Integer;
I,Max:Integer;

Procedure NhapDL;
Begin

Write( n= );Readln(n);‘ ’
For i:=1 to n do

Begin

Write( A[ ,I, ] );‘ ‘ ’ ‘
Readln(A[i]);
 End;

End;

Procedure TimMax;
Var Max:Integer;
Begin

Max:=A[1];

For i:= 1to n do

If Max<A[i] then
 Max:=A[i];

Writeln( Gia tri max cua mang la: ,Max);‘ ’
End;

BEGIN

NhapDL;
TimMax;
END.

4. Cñng cố, luyện tập:

- Giáo viên hớng dẫn học sinh ôn tập phần lý thuyết.
- GV hớng dẫn các em làm bµi tËp.

5. Híng dÉn vỊ nhµ:

- GV: Hớng dẫn học sinh ôn tập ơt nhà theo nội dung đề cơng thực hành và lý
thuyết.

- Chn bÞ kiĨm tra häc kú.

</div>
(79)<div class='page_container' data-page=79>

---tiÕt 36

kiÓm tra häc kú I

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mục tiêu:

- Đánh giá quá trình học tập của học sinh qua học kì I

+ Cú pháp khai báo các kiểu dữ liệu, các câu lệnh, các vòng lặp sử dụng
trong Turbo Pascal.

+ Bit cỏch vit mt chơng trình đơn giản sử dụng các kiểu dữ liệu, các cấu
trúc câu lệnh đó.

- Giáo dục học sinh có thái độ học tập tự giác, tích cực.
Nghiện túc trong kim tra, thi c.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Ti liu, sỏch giỏo khoa.
o Chun cng ụn tp.

o Chuẩn bị phòng máy, mạng Netop Scholl.

- Học sinh:

o Đọc lại bài học.

o Chuẩn bị bài thực hành.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cũ:
Không

3. Dạy- học bài mới.

Đề bài:
Đề 01:

I/ Trc nghim:

Cõu 1: Cho đoạn lệnh sau:
For i:=10 to 50 do
Write(i:4);

Khi thực hiện chương trình đoạn lệnh trên làm gì? :……….….……….………..…..

………
Câu 2: Lệnh Write (Writeln) có ý nghĩa………..……….……….………..
………..………..…..ra màn hình

- Có cấu trúc:………..…
- Ví dụ ..………..……….

</div>
(80)<div class='page_container' data-page=80>

……….………
- Lệnh Write khác lệnh Writeln là: Sau khi ……….……….ra màn
hình. lệnh Writeln cho phép ta………..…….…cịn lệnh Write khơng
……….……….……

Câu 3: Cho đoạn lệnh sau:

n:=0;T:=0;
While n<5 Do
Begin

T:=T+n;
n:=n+1;
End;

Kết quả khi đoạn thực hiện đoạn lệnh trên là: T=…..………..; n=………..
Câu 4: Cho đoạn lệnh sau:

d:=0;

For i:=1 to 20 do

If i mod 3 =0 then

d:=d+1;

Sau khi thực hiện đoạn lệnh trên cho kết quả là: d=……..
II/ Tự luận:

Câu 1: Viết chương trình đưa ra màn hình các dịng chữ:
Truong THCS Thai Hoa

Lop: 9A
Môn: Tin học

Câu 2: Viết chương trình nhập vào 3 số a,b,c



N và tính phép tính sau: S=
(a2+b3).c3.

Câu 3: Viết chương trình để giải và biện luận phương trình dạng ax+b=c.

---§Ị 02:

I/ Trắc nghiệm:

Câu 1: Cho đoạn lệnh sau:
For i:=30 Downto 1 do
Write(i:4);

Khi thực hiện chương trình đoạn lệnh trên làm gì? :……….……….………..…..
………...……….………
Câu 2: Lệnh Read (Readln) có ý nghĩa………..……….………..
……….………..………

- Có cấu trúc:……….………..…

- Ví dụ ..………..……….……….
……….………

- Lệnh Read khác lệnh Readln là: Sau khi ……….……, nhập
………..cho biến. lệnh Readln cho phép ta…………..……….…cịn
lệnh Read khơng …………..………….…………

Câu 3: Cho đoạn lệnh sau:

n:=0;T:=0;
Repeat

</div>
(81)<div class='page_container' data-page=81>

T:=T+n;
n:=n+1;
Until t=10;

Kết quả khi đoạn thực hiện đoạn lệnh trên là: t=…..………..; n=………..
Câu 4: Cho đoạn lệnh sau:

d:=0;

For i:= 70 Downto 30 do
If i mod 5 =0 then

d:=d+1;

Sau khi thực hiện đoạn lệnh trên cho kết quả là: d=……..
II/ Tự luận:

Câu 1: Viết chương trình đưa ra màn hình các dịng chữ:
Truong THCS Thai Hoa

Lop: 9A
Môn: Tin học

Câu 2: Viết chương trình nhập vào 3 số x,y,z



N và tính phép tính sau:
S= x2 + y3+z4.

Câu 3: Viết chương trình nhập vào 3 số a,b,c, kiểm tra xem đó có phải là số đo của 3
cạnh một tam giác hay khơng? Nếu đúng thì kiểm tra xem tam giác đó là tam giác gì?
(vng, cân, u)

---ỏp ỏn

Đề 01:

I. Trắc nghiệm.

Cõu 1:(1đ) In ra màn hình các số từ 10 đến 50 mỗi số cách nhau 4 ký tự.
Câu 2: (1đ) - Đa một dịng thơng báo, giá trị biến.

- Write(‘ Dòng thông báo);
Write(biến);

- Write( Đây là chơgn trình Pascal):
Write(a:3);

- Đa thông tin.
- Xuống dòng.
- Xuống dòng.
Câu 3:(1đ) T=10; n=5;
Câu 4:(1đ) d=6;

II. Bài tập.

Câu 1: (2đ)

Program bt1;
Uses wincrt;
Begin

Writeln(Truong THCS Thai Hoa);
Writeln( Lop: 9A ’);

Writeln(‘ Mụn: Tin hc);
End.

Câu 2: (2đ).

Program bt2;
Uses wincrt;

Var a,b,c,s:Longint;

</div>
(82)<div class='page_container' data-page=82>

Begin

Wrietln(‘Nhap du lieu’);

Write(‘a=’);Readln(a);
Write(‘b=’);Readln(b);
Write(‘c=’);Readln(c);
S:=0;

S:=(a*a+b*b*b)*c*c*c;
Writeln(‘ Tong dai so la:,S);
End.

Câu 3: (2đ)

Program bt3;
Uses Wincrt;
Var a,b,c: Integer;

x:real;
Begin

Writeln( Nhap cac so a,b,c’);

Write(‘ a=’);Readln(a);Write(‘ b=’);Readln(b);
Write(‘ c=’);Readln(c);

If a=0 then

If c-b=0 then Writeln(‘ PT vo so nghiem’)
Else Writeln(‘PT vo nghiem’)

Else
Begin

x:=(c-b)/a;

Writeln(‘ Phuong trinh co nghiem la:’,x:4:2);
End;

End.

§Ị 02:

Nhận xét Ngày....tháng...năm 2008

</div>
(83)<div class='page_container' data-page=83>

Häc k× II

Chương III HỆ QUẢN TRỊ CƠ SỞ DỮ LIỆU FOXPRO

TiÕt 37

GiíI THIƯU CHUNG VỊ FOXPRO

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- Học sinh nắm đợc:

+ Những khái niệm cơ bản về hệ quản trị cơ sở dữ liệu Foxpro.
+ Các cách khởi động

+ Các chế độ làm việc của Foxpro

Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Soạn, su tầm giáo án điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.
o Chuẩn bị bài mới.

III/ Tiến trình tỉ chøc giê d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

Sĩ số

2. Kiểm tra bài cũ:

Không

3. Dạy- học bài mới.

Hot động của thầy và trò Nội dung kiến thức cần t
Hot ng 1:Tỡm hiu khỏi nim v h

quản trị cơ sở dữ liệu.

- GV: Bật mạng Netop Scholl, giới
thiệu một vài ví dụ mô phỏng về quản trị
cơ sở dữ liệu là gì?

- HS quan sát ví dụ và nhận xÐt.

? Hệ quản trị cơ sở dữ liệu là gì?
? Ly c vớ d

HS sinh thảo luận xây dựng bài.
- GV nhận xét, đa ra khái niệm về
hệ quản trị cơ sở dữ liệu.

1/ Hệ quản trị cơ sở dữ liệu là gì?

- H qun tr c s d liệu là một hệ
ch-ơng trình đợc soạn sẵn nhằm giúp ngời sử
dụng dễ dàng tạo ra các file CSDL và thao
tác trên file đó.

- Cho phép ta sửa đổi nội dung, thơng tin ,

cấu trúc, cách sắp xếp, tìm kiếm, lấy và đa
thông tin ra màn hình hay các thiết bị
ngoại vi khác.

</div>
(84)<div class='page_container' data-page=84>

Hoạt động 2: Tìm hiểu Foxpro là gì?
- Giáo viên giới thiệu cho HS biết
về lịch sử ra đời, khái niệm, vai trị và lợi
ích của Foxpro trong việc xây dựng các
chơng trình quản trị cơ sở dữ liệu.

-HS quan s¸t theo dâi.

Hoạt động 3: Tìm hiểu các thao tác
khởi động, chế độ làm việc và thoát
khỏi Foxpro

- Giáo viên bật mạng Netop trình
bày các thao tác khởi động và thoát khỏi
Foxpro, chỉ ra các chế độ làm việc với
Foxpro.

- HS quan s¸t, ghi nhí.

- GV cho học sinh nhắc và thao tác
lại các bớc thực hiện của giáo viên để
khởi động Foxpro.

? Vậy để khởi động Foxpro ta có
mấy cách và cụ thể ta khởi động nh thế
nào?

?Có mấy chế độ làm việc với
Foxpro?

? Thế nào là chế độ hội thoại?
? Thế nào là chế độ lập trình?
? Theo em với chế độ nào thì ta có
thể lu lại những đoạn mã lệnh mà ta mới
thực hiện.

? Muèn tho¸t khái Foxpro ta có
mấy cách, trình bày các cách.

- HS thảo luận trả lời.

- GV nhận xét và đa ra kết luận.

2/ Foxpro là gì?

- Foxpro là một phần mềm do hãng
Microsoft xây dựng sử dụng để quản lý cơ
sở dữ liệu một cách d dng, hiu qu m
n gin.

- ở đây ta thao tác, sử dụng trên phên bản:
Foxpro 2.6 For Window tức là phiên bản
2.6 sử dụng trên môi trờng hệ điều hµnh
Window.

- Với giao diện thân thiện, dễ sử dụng cho

phép ta tạo ra các bảng CSDL nhanh
tróng, khả năng kết nối các cơ sở dữ liệu
nhỏ để quản lý các CSDL đó trên mơi
tr-ờng Window.

3. Tìm các thao tác khởi động và thốt
khỏi Foxpro

a/ Khởi động và chế độ làm việc.
- Ta có 3 cách khởi động cơ bản sau:

(chó ý biĨu tỵng Foxpro có hình dạng đầu
con cáo)

+ Vào Start/Programs/MS Foxpro
+ Nháy chuột phải vào biĨu tỵng
Foxpro råi chän Open.

+ Click đúp chuột trái vào biểu tợng
Foxpro

- Foxpro có 2 chế độ làm việc: Hội thoại
và lập trình.

+ Chế độ hội thoại: Là chế độ thông dịch
mỗi khi ta ra lệnh trong cửa sổ lệnh và thì
Foxpro dịch và thi hành ngay lập tức.
+ Chế độ lập trình: Là chế độ biên dịch
các câu lệnh của Foxpro đợc viết trong
một tệp đợc gọi là tệp chơng trình có phần

mở rộng là *.Prg. Khi thực hiện chơng
trình Foxpro sẽ lần lợt dịch và thực hiện
các lệnh trong chơng trình.

=> Chú ý: Với chế độ lập trình ta có thể
lu lại các lệnh sau khi thc hi v thoỏt
khi chng trỡnh.

-b/ Thoát khỏi Foxpro.

+ Tại cưa sỉ lƯnh ta gâ vµo : Quit vµ nhÊn

</div>
(85)<div class='page_container' data-page=85>

Enter.

+ Vµo File chän Exit.

4. Cđng cè, lun tập:

- Giáo viên khắc sâu kiến thức cho học sinh về hệ quản trị cơ sở dữ liệu và phần
mềm Foxpro 2.6 For Winddow.

- HS nắm đợc cách khởi động, và các chế độ làm việc với Foxpro.
- Yêu cầu HS lấy ví dụ minh hoạ .

5. Híng dÉn vỊ nhµ:

- GV: Hớng dẫn học sinh học tập ở nhà theo nội dung vở ghi.
- Yêu cầu hs đọc trc bi mi.

</div>
(86)<div class='page_container' data-page=86>

Tiết 38

Yêu cầu về phần cøng, phÇn mỊm
khi dïng foxpro

NS:… …/ / 9A 9B 9C 9D 9E

NG:.../
../

I/ mục tiêu:

- Hc sinh nm c:

+ Những yêu cầu cơ bản về phần cứng, phần mềm khi sử dụng hệ quản trị
cơ sở dữ liệu Foxpro 2.6 for winddow

+ Một số điểm cần lu ý khi sử dụng phần mềm Foxpro 2.6.
Giáo dục học sinh có thái độ hc tp t giỏc, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Soạn, su tầm giáo án điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.
o Chuẩn bị bài mới.

III/ Tiến trình tổ chức giờ d¹y.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bài cũ:

? Thế noà là hệ quản trị CSDL?

? Foxpro là gì? Vai trò, chức năng của nó?

? Trỡnh bày các cách khởi động, mô tả các chế độ lm vic ca Foxpro?

3. Dạy- học bài mới.

Hot ng ca thầy và trò Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu u cầu phần

cøng khi sư dơng Foxpro.

- GV: Bật mạng Netop Scholl, giới

thiệu cấu hình tối thiểu để có thể sử dụng
đợc Foxpro 2.6. Ngồi ra yêu cầu về các
phần mềm kèm theo để có thể lm vic
c.

- HS quan sát ví dụ và nhận xét.

? Cấu hình tối thiểu để chạy đợc
bản Foxpro 2.6?

? Yªu cầu về phần cứng.

1/ Yêu cầu về phÇn cøng khi sư dơng
Foxpro.

Để chạy đợc và sử dụng tốt phần mềm
Foxpro 2.6 ta cần có máy tính với cấu
hình tối thiểu sau:

- Yêu cầu tối thiểu:

+ Mỏy tớnh t vi sử lý Pentium II tốc độ
730 MHZ.

+ Bộ nhớ đệm: (RAM) 32MB.
+ ổ đĩa cứng: (HDD): 2GB.

</div>
(87)<div class='page_container' data-page=87>

HS sinh thảo luận xây dựng bài.
- GV nhận xét, đa ra các yêu cầu
cụ thể.

Hot ng 2: Tìm hiểu yêu cầu phần
cứng, phần mềm khi sử dụng Foxpro.
- Giáo viên giới thiệu cho HS biết
các phần mềm cần thiết để sử dụng đợc
tốt phần mềm Foxpro 2.6.

- HS quan s¸t, ghi nhí.

- GV ? Vởy để chạy và sử dụng
hiệu quả chơng trình Foxpro 2.6 thì yêu
cầu về phần mềm ta cần có những phần
mềm nào?

- HS thảo luận, xây dựng bài.
- GV nhận xét và đa ra các yêu cầu
tối thiểu phải có.

2/ Yờu cầu phần mềm tối thiểu để sử
dụng đợc Foxpro 2.6

Để đảm bảo cho việc sử dụng Foxpro thỡ
phn mm ti thiuphi cú l:

- Hệ điều hành Window 98.

- PhÇn mỊm phông chữ tiếng việt: ABC
hc Vietkey.

4. Cđng cè, lun tËp:

- Giáo viên khắc sâu các yêu cầu cần thiết để sử dụng đợc phần mềm Foxpro
2.6 For Winddow.

- HS nắm đợc các đặc tính càn phải có của một máy tính muốn chy c
Foxpro 2.6

- Yêu cầu HS lấy ví dụ minh hoạ .

5. Hớng dẫn về nhà:

- GV: Hng dẫn học sinh học tập ở nhà theo nội dung vở ghi.
- Yêu cầu hs đọc trớc bài mới.

TiÕt 39

C¸c kiĨu d÷ liƯu trong foxpro

NS:… …/ / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- Học sinh nắm đợc:

+ Những kiểu dữ liệu chuẩn thờng đợc sử dụng trong hệ quản trị Foxpro

+ Một số điểm cần lu ý khi sử dụng các kiểu dữ liệu đó.

- Giáo dục học sinh có thái độ học tập tự giác, tích cực.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Soạn, su tầm giáo án điện tử.

o Chuẩn bị phòng máy, mạng Netop Scholl.

</div>
(88)<div class='page_container' data-page=88>

- Học sinh:

o Đọc lại bài học.
o Chuẩn bị bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tổ chức:

Lớp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bµi cị:

?Máy tính cần có cấu hình nh thế nào để có thể sử dụng đợc phiên bản Foxpro 
2.6 For Window?

? Ta cần phải có những phần mềm nào để có th chy c Foxpro 2.6 For 
Window?

3. Dạy- học bài míi.

Hoạt động của thầy và trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu khái niệm về dữ

liƯu vµ kiểu dữ liệu.

- GV: Bật mạng Netop Scholl, lấy
ví dụ minh hoạ thế nào là dữ liệu, kiểu dữ
liệu.

Vớ d: Một con số, một ký tự, một
đoạn văn, một bức tranh, một bản tin dự
báo thời tiết … cũng đợc coi l d liu.

- HS tìm hiểu ví dụ và nhận xét.

? Dữ liệu là gì?

? Thế nào là kiểu d÷ liƯu?

HS sinh thảo luận xây dựng bài.
- GV nhận xét, đa khái niệm.
Hoạt động 2: Tìm hiểu một số kiểu dữ
liệu thờng đợc sử dụng trong hệ quản
trị Foxpro.

- Giáo viên giới thiệu cho HS biết
một số kiểu dữ liệu.

- HS quan sát, ghi nhớ, trả lời các
câu hỏi.

?Lấy vÝ dơ vµ giải thích thế nào
là?

+ Kiểu số?
+ Kiểu ký tự?
+ Kiểu ngày tháng?
+ Kiểu Logic?
+ Kiểu văn bản?

1/ Dữ liệu là gì?Thế nào là kiểu dữ liệu?

- Dữ liệu là thông tin, là số liệu, là ký tự,
là hình ảnhmà ta đa vào hệ quả trị
Foxpro.

- Trong tt c nhng thơng tin ta đa vào
máy tính để q trình làm việc, quả lý dễ
dàng ngời ta phân ra thành nhiều loại khác
nhau nh: Số liệu, ký tự, hình ảnh, âm
thanh…và các loại đó đợc gọi chung là
kiểu dữ liệu. Nói cách khác dữ liệu đa vào
có dạng tơng tự giống nhau đợc gọi là một
kiểu dữ liệu.

2/ Các kiểu dữ liu thng c s dng
trong Foxpro.

- Trong qua trình quản trị CSDL ngời ta
chia dữ liệu thành các kiểu sau:

+ Kiểu ký tự: (C-Character)

+ Kiểu số: (N-Numeric)

+ Kiểu ngày tháng: (D-Date)

+ Kiểu Logic: (L-Logical)

+ Kiểu văn bản: (M-Memo)

</div>
(89)<div class='page_container' data-page=89>

- HS thảo luận, xây dựng bài.
- GV nhận xét giới thiệu các kiểu
dữ liệu.

Hot ng 3: Tỡm hiểu thế nào là dữ
liệu kiểu ký t.

- Giáo viên giới thiÖu, lÊy vÝ dụ
minh hoạ cho dữ liệu kiểu ký tự.

- HS quan sát, ghi nhớ, trả lời câu
hỏi?

?Thế nào là kiểu dữ liệu dạng ký
tự?

? Lấy ví dụ minh hoạ.

- HS thảo luận xây dựng bài.
- GV: Nhận xét và đa ra khái niệm,
ví dụ cho kiểu dữ liệu dạng số.

3/ Thế nào là kiểu ký tự:

- Dữ liệu kiểu ký tự là dữ liệu bao gồm các
chữ cái thờng hay hoa, các chữ số và các
ký tự khác.

- Để viết dữ liệu kiểu C (Character) trong
biểu thức ta phải đặt chúng trong cặp dấu
nháy đơn (') hay cặp dấu nháy kép (").

- VÝ dô:

"A", "B", "Cong ty"…

- Dữ liệu kiểu C có thể đem so sánh, sắp
xếp đợc dựa theo giá trị của các ký tự
trong bảng mã ASCII, hoặc có thể ghép
chúng lại với nhau.

- Ví dụ: Ta ghép các ký tự trong trờng
họ, tên đệm với trờng tên để đợc hoàn

chỉnh họ, tên đệm, tên của một đối tợng
nào đó

4. Cđng cè, lun tËp:

- Giáo viên yêu cầu học sinh nhắc lại khái niệm dữ liệu và kiểu dữ liệu.
- Nhắc lại một số kiểu dữ liệu thờng đợc sử dụng trong Foxpro.

- HS nắm đợc thế nào là dữ liệu dạng ký tự, lấy đợc ví dụ minh hoạ.

5. Híng dÉn vỊ nhµ:

- GV: Hớng dẫn học sinh học tập ở nhà theo nội dung vở ghi.
- Yêu cầu hs đọc trớc bài mi.

---Tiết 40

Các kiểu dữ liệu trong foxpro

NS: / / 9A 9B 9C 9D 9E

NG:….../
../

…

I/ mơc tiªu:

- Học sinh nắm đợc:

+ Những kiểu dữ liệu chuẩn thờng đợc sử dụng trong hệ quản trị Foxpro
+ Một số điểm cần lu ý khi sử dụng các kiểu dữ liệu đó.

- Giáo dục học sinh có thái độ học tập tự giác, tớch cc.

II/ Chuẩn bị tài liệu, thiết bị dạy học.

- Giáo viên:

o Tài liệu, sách giáo khoa.
o Soạn, su tầm giáo án điện tử.

</div>
(90)<div class='page_container' data-page=90>

o Chuẩn bị phòng máy, mạng Netop Scholl.
- Học sinh:

o Đọc lại bài học.
o Chuẩn bị bài mới.

III/ Tiến trình tổ chức giờ dạy.

1. Tỉ chøc:

Líp 9A 9B 9C 9D 9E

SÜ sè

2. KiĨm tra bài cũ:

? Thế nào là dữ liệu, kiểu dữ liệu?

?ảTình bày, lấy ví dụ minh hoạ cho dữ liệu kiểu ký tự?

3. Dạy- học bài mới.

Hot ng ca thy v trị Nội dung kiến thức cần đạt
Hoạt động 1:Tìm hiểu dữ liệu kiểu số

(N-Numeric)

- GV: BËt m¹ng Netop Scholl lÊy
vÝ dụ về dữ liệu kiểu số:

- HS quan sát ví dụ và nhận xét.

? Dữ liệu kiểu số là gì?

? Trong dữ liệu kiểu số có những
loại số nào?

HS sinh thảo luận xây dựng bài.
- GV nhận xét, đa ra kh¸i niƯm cơ
thĨ.

Hoạt động 2: Tìm hiểu về dữ liệu kiểu
ngày tháng.- Giáo viên giới thiệu, lấy ví
dụ minh hoạ cho dữ liệu kiểu ngày tháng
- HS quan sát, ghi nhớ, trả lời các
câu hỏi?

? ThÕ nµo là dữ liệu kiểu ngày
tháng?

? Ta thờng gặp dữ liệu kiểu ngày
tháng trong các trờng hợp nào?

? Ta có các chuẩn biểu diễn kiểu
ngày tháng?

- HS thảo luận, xây dựng bµi.
- GV nhËn xÐt và đa khái niệm,
nội dung bài học.

1/ Thế nào là dữ liệu kiĨu sè:

VÝ dơ: +/ 10
+/ -20
+/ 5.234

- Vậy dữ liệu kiểu số là dữ liệu gồm tất cả
các số, số nguyên lẫn số thực.

- Kiu ny đợc trình bày nh bình thờng ,
nếu là số thực thì phải dùng dấu chấm

"." để phân cách giữa phần nguyên và
phần thập phân.

- Dữ liệu kiểu số có thể thực hiện đợc các

phép tính so sánh, sắp xếp và các phép
tính số học: (+,-,*,/).

2/ ThÕ nào là dữ liệu kiểu ngày tháng.

- Ví dụ: +/ 20/11/1983.
+/ 11/20/1983.

- VËy d÷ liƯu kiểu ngày tháng là những
thông tin biểu diễn giá trị là ngày tháng và
tuân thủ lịch ngày, tháng, năm.

- Trong Foxpro ngy tháng đợc biểu diễn
theo một trong các dạng sau:

* Kiểu Mỹ: mm/dd/yy.
* Kiểu Anh: dd/mm/yy.
* Kiểu Pháp: dd/mm/yy.
* Kiểu Italia: dd-mm-yy.
* Kiểu Đức: dd.mm.yy
Trong ú:

- d: Biểu diễn giá trị là ngày.

</div>
(91)<div class='page_container' data-page=91>

Hoạt động 3: Tìm hiểu dữ liệu kiểu
Logic.

- GV bËt m¹ng Netop School giíi
thiƯu cho HS quan sát khái niệm, ví dụ
của dữ liệu kiểu Logic.

- HS quan sát, ghi nhớ, trả lời các
câu hỏi xây dựng bài.

?Thế nào là dữ liệu kiểu Logic?
? Ta thờng gặp dữ liệu kiểu Logic
trong những trờng hợp nào?

?Dữ liệu kiểu logic có mấy giá trị?

- HS tho lun, xõy dựng bài.
- GV nhận xét, đa ra khái niệm.
Hoạt động 4: Tìm hiểu dữ liệu kiểu
Memo

- GV giíi thiƯu, lÊy vÝ dô minh
hoạ cho kiểu dữ liệu kiểu Memo

?Lm th no lu giữ đợc những
thơng tin có dung lợng lớn?

- HS thảo luận, xây dựng bài.
- GV nhận xét, đa ra kết luận.

- m: Biểu diễn giá trị là tháng.
- y : Biểu diễn giá trị là năm.

3/ Dữ liệu kiểu Logic.

- Ví dụ: Nếu giới tính là nam thì đánh số

1 cịn nếu là nữ thì đánh sơ khơng.

Nam: 1
N÷: 0.

-Vậy dữ liệu kiểu Logic là kiểu dữ liệu chỉ
mang hai giỏ tr l ỳng hoc sai:

+ Đúng mang giá trị: 1.
+ Sai mang giá trị là : 0

- Dữ liệu dạng này chỉ sử dụng cho các
phép toán Logic.

4/ Dữ liệu kiểu memo.

- Vớ d: on thụng tin nhận xét về quá
trình học tập, phấn đấu của một học sinh
nào đó.

- Vậy dữ liệu kiểu memo là kiểu đặc biệt
thờng dùng để lu giữ những thông tin dạng
văn bản có dung lợng lớn.

4. Cđng cè, lun tËp:

- Giáo yêu cầu học sinh nắm đợc các kiểu dữ liệu thờng đợc sử dụng trong
Foxpro.

- Biết đợc ý nghĩa, cách sử dụng, lấy ví dụ minh hoạ cho các kiểu dữ liệu đó.

- u cầu HS lấy ví dụ minh hoạ .

5. Híng dÉn vỊ nhµ:

- GV: Hớng dẫn học sinh học tập ở nhà theo nội dung vở ghi.
- Yêu cầu hs đọc trớc bài mới.

NhËn xét Ngày....tháng...năm 2008

</div>

Giao an Tin 9

bi





<b>Chương III HỆ QUẢN TRỊ CƠ SỞ DỮ LIỆU FOXPRO</b>

Tài liệu liên quan

Tài liệu bạn tìm kiếm đã sẵn sàng tải về