ngày soạn ngày soạn 02012010 ngày dạy 8a 05012010 8b 05012010 tiết 37 bài 7 câu lệnh lặp 1 mục tiêu a kiến thức biết nhu cầu cần có cấu trúc lặp trong ngôn ngữ lập trình biết ngôn ngữ lập trình

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 (1.46 MB, 81 trang )

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

Ngày soạn: 02/01/2010 Ngày dạy: 8A: 05/01/2010
8B: 05/01/2010

Tiết 37:

Bài 7: CÂU LỆNH LẶP

1. Mục tiêu:

a. Kiến thức:

- Biết nhu cầu cần có cấu trúc lặp trong ngơn ngữ lập trình.

- Biết ngơn ngữ lập trình dùng cấu trúc lặp để chỉ dẫn máy tính thực hiện lặp
đi lặp lại cơng việc nào đó một số lần.

b. Kỹ năng:

- Hiểu hoạt động của câu lệnh với số lần biết trước for...do trong Pascal.
c. Thái độ:

- u thích mơn học, nghiêm túc trong giờ học.
2. Chuẩn bị của giáo viên và học sinh:

a. Chuẩn bị của giáo viên:

- Giáo án, phòng máy, máy chiếu, phần mềm Pascal.
b. Chuẩn bị của học sinh:

- Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy

a. Kiểm tra bài cũ: Không KT

b. Dạy nội dung bài mới:40’

HOẠT ĐỘNG CỦA THẦY VÀ TRÒ NỘI DUNG KIẾN THỨC

GV: Nêu một số công việc thường ngày

1. Các công việc phải thực hiện nhiều
lần: 15’

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

trong cuộc sống

Trong cuộc sống hằng ngày, nhiều hoạt
động được thực hiện lặp đi lặp lại nhiều
lần.

Có những hoạt động mà chúng ta
thường thực hiện lặp lại với một số lần
nhất định và biết trước, chẳng hạn đánh
răng mỗi ngày hai lần, mỗi ngày tắm
một lần,... Chúng ta cịn lặp lại những
cơng việc với số lần không thể xác định
trước: học cho đến khi thuộc bài, nhặt
từng cọng rau cho đến khi xong,...

GV: Giới thiệu câu lệnh lặp trong
Pascal

HS: Ghi chép

Khi viết chương trình máy tính cũng vậy.

Để chỉ dẫn cho máy tính thực hiện đúng
cơng việc, trong nhiều trường hợp ta cũng
cần phải viết lặp lại nhiều câu lệnh thực
hiện một phép tính nhất định.

2. Câu lệnh lặp - một lệnh thay cho
nhiều lệnh: 25’

Ví dụ 1. Giả sử ta cần vẽ ba hình vng
có cạnh 1 đơn vị như hình 33. Mỗi hình
vng là ảnh dịch chuyển của hình bên
trái nó một khoảng cách 2 đơn vị. Do đó,
ta chỉ cần lặp lại thao tác vẽ hình vng
ba lần. Việc vẽ hình có thể thực hiện được
bằng thuật tốn sau đây:

Bước 1. Vẽ hình vuông (vẽ liên tiếp bốn
cạnh và trở về đỉnh ban đầu).

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

GV: Cho ví dụ về vẽ hình vng và giải
thích ví dụ cho học sinh

GV: Cho ví dụ về tính tổng 100 số tự
nhiên giải thích ví dụ cho học sinh

Hình 33

Riêng với bài tốn vẽ một hình vng (h.
34), thao tác chính là vẽ bốn cạnh bằng
nhau, hay lặp lại bốn lần thao tác vẽ một

đoạn thẳng. Sau mỗi lần vẽ đoạn thẳng,
thước kẻ được quay một góc 90o sang phải
tại vị trí của bút vẽ. Thuật tốn sau đây sẽ
mơ tả các bước để vẽ hình vng:

Hình 34

Bước 1. k  0 (k là số đoạn thẳng đã vẽ
được).

Bước 2. Vẽ đoạn thẳng 1 đơn vị độ dài và
quay thước 90o sang phải.

Bước 3. k  k +1. Nếu k ≤ 4 thì trở lại
bước 2; ngược lại, kết thúc thuật toán.
Lưu ý rằng, biến k được sử dụng như là
biến đếm để ghi lại số cạnh đã vẽ được.
Ví dụ 2. Giả sử cần tính tổng của 100 số
tự nhiên đầu tiên, tức là tính:

S = 1 + 2 + 3 + ... + 100.

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

phép cộng 100 lần.
HS: Ghi vở

Cách mơ tả các hoạt động lặp trong thuật
tốn như trong ví dụ trên được gọi là cấu
trúc lặp.

Mọi ngơn ngữ lập trình đều có "cách" để

chỉ thị cho máy tính thực hiện cấu trúc lặp
với một câu lệnh. Đó là các câu lệnh lặp.
c. Củng cố, luyện tập: 4’

- Nhắc lại các hoạt động lặp trong cuộc sống
d. Hướng dẫn học sinh tự học ở nhà: 1’

- Về nhà xem lại phần còn lại.
- Học bài cũ.

Ngày soạn: 05/01/2010 Ngày dạy: 8A: 08/01/2010

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

Bài 7: CÂU LỆNH LẶP (T2)

1. Mục tiêu:

a. Kiến thức:

- Biết nhu cầu cần có cấu trúc lặp trong ngơn ngữ lập trình.

- Biết ngơn ngữ lập trình dùng cấu trúc lặp để chỉ dẫn máy tính thực hiện lặp
đi lặp lại cơng việc nào đó một số lần.

b. Kỹ năng

- Viết đúng được lệnh for...do trong một số tình huống đơn giản.
- Hiểu lệnh ghép trong Pascal

c. Thái độ

- Tập trung cao độ, nghiêm túc trong giờ học.

2. Chuẩn bị của giáo viên và học sinh:

a. Chuẩn bị của giáo viên:

- Giáo án, phòng máy, máy chiếu, phần mềm Pascal.
b. Chuẩn bị của học sinh:

- Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a. Kiểm tra bài cũ: Đan xen trong tiết học
b. Dạy nội dung bài mới: 37’

HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG

GV: Giới thiệu câu lệnh lặp trong
Pascal

HS: Chú ý quan sát

GV: Nêu cú pháp của câu lệnh lặp

3. Ví dụ về câu lệnh lặp: 15’

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

HS: chú ý và ghi vở

GV: Nêu một ví dụ về câu lệnh lặp

GV Nêu Ví dụ Để in một chữ "O" trên
màn hình, ta có thể sử dụng lệnh:

Câu lệnh lặp đơn giản nhất trong 
Pascal có dạng:

for <biến đếm> := <giá trị
đầu> to <giá trị cuối> do 
<câu lệnh>;

Khi gặp câu lệnh lặp trên, câu lệnh
được thực hiện bắt đầu với giá trị biến
đếm bằng giá trị đầu. Sau đó giá trị 
biến đếm tăng dần một đơn vị từ giá trị 
đầu đến giá trị cuối và câu lệnh được 
thực hiện mỗi lần tăng biến đếm cho
đến khi biến đếm vượt quá giá trị cuối
thì kết thúc. Như vậy biến đếm phải
được khai báo là kiểu nguyên và giá trị
cuối phải khơng nhỏ hơn giá trị đầu.
Ví dụ 3. Chương trình sau sẽ in ra màn 
hình thứ tự lần lặp:

program Lap;
var i: Integer;
begin

for i := 1 to 10 do
writeln('Day la lan
lap thu ',i);

end.

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

HS: Đọc kỹ ví dụ

GV: Trình bày bằng các câu lệnh Pascal

hình, ta có thể sử dụng lệnh:
writeln('O');

HS: Quan sát các câu lệnh trong chương
trình.

Nếu muốn viết chương trình mơ phỏng
một quả trứng rơi từ trên cao xuống, ta
có thể lặp lại lệnh trên nhiều lần (ví dụ,
20 lần) như trong chương trình sau:

Uses crt;

Var i: integer;
begin

Clrscr;

for i:=1 to 20 do 
begin writeln('O'); 
delay(100) end;

end.

Dịch và chạy chương trình này, ta sẽ

thấy kết quả như ở hình 35 dưới đây:

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

GV: Cho ví dụ về tính tổng và tích câu
lệnh lặp

VD: Ví dụ 5. Chương trình sau đây sẽ
tính tổng của N số tự nhiên đầu tiên, với
N là số tự nhiên được nhập vào từ bàn
phím

HS: Quan sát ví dụ.

Hình 35

4. Tính tổng và tích bằng câu lệnh lặp
: 22’

Ví dụ 5. Chương trình sau đây sẽ tính 
tổng của N số tự nhiên đầu tiên, với N
là số tự nhiên được nhập vào từ bàn
phím (xem ví dụ 2).

program Tinh_tong;
var N,i: Integer;
S: longint;
begin

write('Nhap so N = ');
readln(N);

S:=0;

for i := 1 to N do
S:=S+i;

writeln('Tong cua
',N,' so tu nhien dau
tien S = ',S);

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

Ví dụ 6. Ta kí hiệu N! là tích N số tự 
nhiên đầu tiên.

HS: Quan sát và tìm cách giải quyết
bài

GV: Hướng dẫn một số lệnh trong
Pascal sẽ được sử dụng trong bài.

HS: Viết chương trình

GV: Nhận xét

Ví dụ 6. Ta kí hiệu N! là tích N số tự 
nhiên đầu tiên.

N! = 1.2.3. ... N

Dưới đây là chương trình tính N! với N
là số tự nhiên được nhập vào từ bàn
phím. Chương trình sử dụng một câu

lệnh lặp for…do:

program Tinh_Giai_thua;
var N,i: Integer;

P: longint;
begin

write('N = ');
readln(N);

P:=1;

for i:=1 to N do
P:=P*i;

writeln(N,'! = ',P);
end.

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

trị của nó đủ lớn.

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

- Nhắc lại một số ví dụ về câu lệnh lặp
- Viết lại dạng tổng quát của cấu trúc lặp?
d. Hướng dẫn học sinh tự học ở nhà: 1’

- Về nhà xem lại phần còn lại của bài, tiết sau làm các bài tập về câu lệnh lặp

Ngày soạn: 08/01/2010 Ngày dạy: 8A: 12/01/2010

8B: 12/01/2010

Tiết 39:

BÀI TẬP

1. Mục tiêu

a. Kiến thức:

- Biết ngôn ngữ lập trình dùng cấu trúc lặp để chỉ dẫn máy tính thực hiện lặp
đi lặp lại cơng việc nào đó một số lần.

b. Kỹ năng

- Hiểu hoạt động của câu lệnh với số lần biết trước for...do trong Pascal.
c. Thái độ

- u thích mơn học, nghiêm túc trong giờ học.
2. Chuẩn bị của giáo viên và học sinh:

a. Chuẩn bị của giáo viên:

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

- Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a. Kiểm tra bài cũ: Đan xen trong tiết học
b. Dạy nội dung bài mới: 40’

HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG

GV: Cho bài tập 1

? Hãy viết thuật toán để thực hiện bài toán
trên?

HS: Viết thuật toán để giải quyết bài tốn
trên.

GV: Nêu một ví dụ về câu lệnh lặp

Bài tập 1: 15’

a) Có thể mơ tả các bước của thuật 
tốn để vẽ hình ... a) như sau:

Bước 1. Xác định điểm bắt đầu vẽ là X. 
Bước 2. Đặt i = 0 và đặt hướng = lên 
trên.

Bước 3. Vẽ nửa đường tròn theo hướng 
đã đặt.

Bước 4. i = i + 1.

Bước 5. Nếu i > 4, chuyển bước 6; 
ngược lại, đặt hướng = hướng + 1 và 
quay lại bước 3.

Bước 6. Kết thúc thuật toán.

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

GV: Yêu cầu học sinh viết các thuật tốn để
thực hiện giải bài tốn tính tổng dãy số

GV: Kiểm tra và nhận xét

GV: Yêu cầu học sinh viết các thuật toán để
thực hiện giải bài tốn tính tổng dãy số

hướng trong thuật tốn.

b) Thuật tốn tương tự như trên. Thao 
tác chính cần lặp lại là vẽ hình vng.
Tại mỗi bước, giữ ngun tâm hình
vng và thay đổi hướng vẽ một góc
30o.

Bài tập 2: 13’

Thuật tốn tính tổng

A = ... ( 1 1)
5

.
3

1
4
.
2

1
3
.
1




n
n
Bước 1. Gán A  0, i  1. 
Bước 2. A  i i( 12).

Bước 3. i  i + 1.

Bước 4. Nếu i  n, quay lại bước 
2.

Bước 5. Ghi kết quả A và kết thúc 
thuật toán.

Bài tập 3:12’

Trừ d), tất cả các câu lệnh đều không

hợp lệ:

a) Giá trị đầu phải nhỏ hơn giá trị cuối;
b) Các giá trị đầu và giá trị cuối phải là
số nguyên;

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

GV: Kiểm tra và nhận xét

d) Thừa dấu chấm phẩy thứ nhất, nếu 
như ta muốn lặp lại câu lệnh

writeln('A') mười lần, ngược lại câu 
lệnh là hợp lệ;

e) Biến x đã được khai báo như là biến 
có dữ liệu kiểu số thực và vì thế không 
thể dùng để xác định giá trị đầu và giá 
trị cuối trong câu lệnh lặp.

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

? Nhắc lại các thuật toán trong các bài tập trên?
d. Hướng dẫn học sinh tự học ở nhà: 1’

- Về nhà xem các bài tập còn lại, tiết sau làm tiếp các bài tập

Ngày soạn: 11/01/2010 Ngày dạy: 8A: 15/01/2010

8B: 16/01/2010

Tiết 40:

BÀI TẬP (Tiếp)

1. Mục tiêu

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

- Biết nhu cầu cần có cấu trúc lặp trong ngơn ngữ lập trình.
b. Kỹ năng:

- Viết đúng được lệnh for...do trong một số tình huống đơn giản.
- Hiểu lệnh ghép trong Pascal

c. Thái độ:

- Nghiêm túc trong giờ học, u thích mơn học.
2. Chuẩn bị của giáo viên và học sinh:

a. Chuẩn bị của giáo viên:

- Giáo án, phòng máy, máy chiếu, phần mềm Pascal.
b. Chuẩn bị của học sinh:

- Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a. Kiểm tra bài cũ: Đan xen trong tiết học
b. Dạy nội dung bài mới: 39’

HOẠT ĐỘNG CỦA GV VÀ HS NỘI DUNG

GV: Cho bài tập yêu cầu học sinh viết
thuật toán và các lệnh để giải quyết bài

toán như sau:

HS: Viết thuật toán để giải quyết bài
toán trên.

Bài tập 1: Thuật toán: 15’

Bước 1. Nhập các số n và x.

Bước 2. A  1, i  0 (A là biến lưu luỹ
thừa bậc n của x).

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

GV: Nêu một ví dụ về câu lệnh lặp

GV: Cho bài tốn "Nhập n số tự nhiên
và tìm số lớn nhất trong các số vừa nhập
" yêu cầu học sinh viết thuật toán và các
lệnh để giải quyết bài toán.

HS: Viết thuật tốn, chương trình.

Bước 4. Nếu i < n, quay lại bước 
3.

Bước 5. Thông báo kết quả A là 
luỹ thừa bậc n của x và kết
thúc thuật toán.

Chương trình Pascal có thể như sau:
var n,i,x: integer; a:

longint;

begin

write('Nhap x=');
readln(x);

write('Nhap n=');
readln(n);

A:=1;

for i:=1 to n do 
A:=A*X;

writeln(x,' mu ',n,'
bang ',A);end.

Bài tập 2) Thuật toán: 12’

Bước 1. Nhập số n.

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

GV: Kiểm tra và nhận xét

nguyên cho A), i 1.

Bước 3. Nhập số thứ i và gán giá 
trị đó vào biến A.

Bước 4. Nếu Max < A, Max  A.

Bước 5. i i + 1.

Bước 6. Nếu i ≤ n, quay lại bước 
3.

Bước 7. Thông báo kết quả Max là
số lớn nhất và kết thúc thuật tốn.
Chương trình Pascal có thể như sau:

uses crt;

var n,i,Max,A: integer;
begin

clrscr;

write('Nhap N=');
readln(n);

Max:=-32768;
for i:=1 to n do

begin write('Nhap so
thu ',i,':');

readln(A);

if Max<A then
Max:=A end;

writeln('So lon nhat:
',Max);

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

GV: Cho bài toán yêu cầu học sinh viết
thuật toán và các lệnh để giải quyết bài
toán.

GV: Kiểm tra và nhận xét

Bài tập 3) 12’

Lời giải bài này tương tự như lời giải
của bài 9 ở trên (xem thuật toán trong
lời giải bài tập 5a, bài 5). Chương trình
Pascal có thể như sau:

uses crt;

var n,i,SoDuong,A: 
integer;

begin
clrscr;

write('Nhap N=');
readln(n);

if n>0 then
begin

SoDuong:=0;

for i:=1 to n do
begin

write('Nhap so thu
',i,':'); readln(A);
if A>0 then

SoDuong:=SoDuong+1 end;
writeln('So cac so
duong = ',SoDuong)

end

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

end.

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

? Nhắc lại các thuật toán trong các bài tập trên và một số lệnh sử dụng trong
chương trình?

d. Hường dẫn học sinh tự học ở nhà: 1’

- Về nhà xem lại các bài tập tiết sau chúng ta thực hành Bài thực hành 5

Ngày soạn: 16/01/2010 Ngày dạy: 8A: 19/01/2010

8B: 19/01/2010
TiÕt 41

Bµi thùc hµnh 5:

Sư dơng lệnh lặp for ...do (t1)

1. Mục tiêu:

a. KiÕn thøc:

Vận dụng kiến thức của vòng lặp for… do, cõu lnh ghộp vit chng trỡnh.

b. Kỹ năng:

Viết đợc chơng trình có sử dụng vịng lặp for … do;
Sử dụng đợc câu lệnh ghép;

Rèn luyện kỹ năng đọc hiểu chơng trình có sử dụng vịng lặp for ….. do.

c.Thái độ:

Thái độ học tập nghiêm túc, tích cực làm các bài tập thực hành.
2. Chuẩn bị:

a. Giáo viên: Giáo án, máy tính, sgk.

b. Học sinh: Kiến thức cũ, sgk
3. Tiến trình bài dạy:

a. Kieồm tra bài cũ: 6p
Kiểm tra bài tập đã cho về nhà.
 Giới thiệu bài mới:

Chúng ta đã nghiên cứu lý thuyết về vòng lặp for … do. để biết vòng lặp chạy nh thế nào
thì hơm nay chúng ta cùng nhau đi vào tiết thực hành. Giáo viên ghi tên bài học lên bảng.
 3. Dạy bài mới : 35p

HĐ của Thầy HĐ của Trò Ghi Bảng

Hot ng 1 20p

- Vit chơng trình cho các bài tập đã
cho về nhà

- GV: yêu cầu mỗi dÃy gõ một bài vào
máy.

- GV: hỗ trợ học sinh trong quá trình

- HS: gõ chơng
trình, chạy thử

Bài 1: Tính tổng của n số tự nhiên
đầu tiên

Program tinh_tong;
Uses crt;

Var i, n: integer; tong: longin;
Begin

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

thùc hµnh.

- Sau khi kết quả chạy chơng trình đã
đúng, gv yêu cầu học sinh chữa bài của
mình đã làm ở nhà cho đúng theo
ch-ơng trình đã chạy.

Hoạt đơng 2 - 15p

Bảng cửu chơng.

- GV: a ra ni dung của bài tốn.
- GV: Đa nội dung chơng trình lên màn
hình, yêu cầu học sinh đọc hiểu chơng
trình.

- GV: yêu cầu một học sinh đứng tại vị
trí trình bày hoạt động của chơng trình,
các nhóm khác cùng tham gia phõn
tớch.

- GV: cho chơng trình chạy trên máy,
yêu cầu học sinh quan sát kết quả.

chơng trình, và
báo cáo kết quả.

- HS: Nghiờn cu
bi tốn, tìm
input và output.
- HS: đọc, phân
tích câu lệnh

Writeln(‘Nhap vao so n’);
readln(n);

For i:=1 to n do
Tong: = Tong+i;

Writeln(‘Tong cđa’, n,’so tu nhien
dautien la’,tong);

Readln;
End.

Bài 2. Viết chơng trình tìm xem
có bao nhiêu số dơng trong n số
nhập vào từ bàn phím

Program tinh_so_cac_so_duong;
Uses crt;

Var i,A, dem, n: integer;
Begin

Clrscr;
Dem:=0;

Writeln(‘Nhap vao so n’);
readln(n);

For i:=1 to n do

begin

writeln(‘nhap vao so thu’,i);
readln(A);

if A>0 then dem:=dem+1;
end;

Writeln(‘So cac so duong
la’,dem);

Readln;
End.

Bài 3: Viết chơng trình in ra màn
hình bảng nhân của một số từ 1
đến 9, và dừng màn hình để có
thể quan sát kết quả.

Program Bang_cuu_chuong;
Uses crt;

Var i, n: integer;
Begin

Clrscr;

Writeln(‘Nhap vao so n’);
readln(n);

Writeln(‘Bang nha’,n);
Writeln;

For i:=1 to 10 do

Writeln(n,’x’,i:2,’=’,n*i:3);
Readln;

End.

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

NhËn xÐt, rót kinh nghiƯm tiÕt thùc hµnh 
d. Hướng dẫn học sinh tự học ở nhà: 1p

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

Ngày soạn: 18/01/2010 Ngày dạy: 8A: 22/01/2010
8B: 23/01/2010
TiÕt 42

Bµi thùc hµnh 5:

Sư dơng lƯnh lặp for ...do (t1)

1. Mục tiêu:

a. Kiến thức:

Vn dng kin thức của vòng lặp for… do, câu lệnh ghép để viết chơng trình, tìm
hiểu câu lệnh gotoxy(), where<>, lệnh for lng trong for

b. Kỹ năng:

Vit c chng trỡnh có sử dụng vịng lặp for… do;
Sử dụng đợc câu lệnh ghép;

Rèn luyện kỹ năng đọc hiểu chơng trình có sử dụng vòng lặp for ... do.

c.Thái độ:

Thái độ học tập nghiêm túc, tích cực làm các bài tập thực hành.

2. chuÈn bÞ:

a. Giáo viên: Giáo án, máy tính, sgk.

b. Học sinh: Kiến thức cũ, sgk

3. TIẾN TRÌNH BÀI DẠY:

a. Kiểm tra bài cũ: 
 b. Dạy bài mới : 40p

HĐ của Thầy HĐ của Trò Ghi Bảng

Hot ng 1 – 20p

- Làm đẹp màn hình kết quả
bằng lệnh gotoxy, where.
- Giáo viên cho chạy kết quả
của bài thực hành
Bang_cuu_chuong Yêu cầu
học sinh quan sát kết quả và

nhận xét khoảng cách giữa các
hàng, cột.

? Có cách nào để khoảng cách
giữa các hàng và các cột tăng
lên?

- GV: Giíi thiƯu câu lệnh
gotoxy và where.

- yêu cầu học sinh mở chơng
trình Bang_cuu_chơng và sửa
lại chơng trình theo bài trên
màn hình của giáo viên.

- GV: yêu cầu học sinh quan
sát kết quả và so sánh với kết
quả của chơng trinh khi cha
dïng lÖnh gotoxy(5, where)

- HS: quan sát và đa ra nhận
xét.

- HS: gõ chơng trình vào
máy, sửa lỗi chính tả, chạy
chơng trình, quan sát kết
quả.

- HS: quan sát vµ nhËn xÐt.

Bµi 2 sgk (T63)

Giíi thiƯu lƯnh gotoxy(),
where

- Gotoxy(a,b)

Trong đó: a là chỉ số cột, b là
chỉ số hàng

- ý nghÜa của câu lệnh là đa
con trỏ về cột a hàng b.
- Where: cho biÕt sè thø tù
cña cét, wherey cho biết số
thứ tự của hàng.

* Lu ý: Phải khai báo th viƯn
crt tríc khi sư dơng hai lƯnh
trªn

a) ChØnh sưa chơng trình nh
sau:

Program Bang_cuu_chuong;
Uses crt;

Var i, n: integer;
Begin

Clrscr;

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

Hoạt động 2 – 20p

- Sư dơng lƯnh For lång trong
for

- GV: giíi thiƯu cÊu tróc lƯnh
for lång, híng dÉn häc sinh
c¸ch sư dơng lƯnh.

- GV: đa nội dung chơng trình
bài thực hành 3 lên màn hình,
yêu cầu học sinh đọc chơng
trình, tìm hiểu hoạt động của
chơng trình.

- GV: cho chạy chơng trình.

- HS: ghi chÐp cÊu tróc vµ
lÜnh héi

- HS: hoạt động theo nhóm,
tìm hiểu hoạt động của
ch-ơng trinh, đại diện của nhóm
báo cáo kết qu tho lun.

- HS : quan sát kết quả trên
màn hình.

readln(n);

Writeln(Bang nha,n);
Writeln;

For i:=1 to 10 do
begin

gotoxy(5, wherey);

Writeln(n,x,i:2,=,n*i:3);
Readln;

End.

Bài 3 SGK (T64).

C©u lƯnh for lång trong
for

- For <biến đếm1:= giá
trị đầu> to <giá trị
cuối>do

For<biến đếm 2:=giá
trị đầu> to<giá trị cuố>
do

< c©u lƯnh>;
Program Tao_bang;
Uses crt;

Var i,j: byte;
Begin

Clrscr;

For i:=1 to 9 do
Begin

For j:=0 to 9 do
Writeln(10*i+j:4);
Writeln;

End;
Readln;
End.

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

NhËn xÐt rót kinh nghiƯm giê thùc hµnh.

d. Hướng dẫn học sinh tự học ở nhà: 2p

Học sinh về nhà sử dụng lệnh gotoxy để chỉnh sửa lại bài thực hành số 3 cho kết
quả in ra màn hình đẹp.

Ngày soạn: 22/01/2010 Ngày dạy: 8A: 26/01/2010

8B: 26/01/2010
Tiết 43: học vẽ hình với phần mÒm geogebra

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

a) Kiến thức: Học sinh biết đợc ý nghĩa của hình học geogebra. Làm quen với
phần mềm này nh khởi động, các thanh công cụ, các nút lệnh .. .

b) Kỹ năng: Nắm đợc cách vẽ một hình nào đó khi sử dụng phần mm geogebra
ny.

c) Thỏi : Hứng thú và yêu thích môn học.

2/ Chuẩn bị:

a) Giỏo viờn: - Sách giáo khoa, giáo án, tài liệu tin học có liên quan.

b) HS: - Đọc tài liệu ở nhà trớc khi

3/ Tiến trình lên lớp:
a) Kiểm tra. 5

- Làm bài tập 3 trang 64?

...
...

b) Bµi míi: 40’

Hoạt động của GV và HS Nội dung

Hoạt động 1: Giới thiệu phần mềm geogebra. (10’)

Cho học sinh đọc thơng tin SGK

? Em biÕt g× vỊ phần mềm geogebra.
Nếu biết hÃy nêu một vài ví dơ.

? Phần mềm geogebra có đặc điểm gì?
Giáo viên giới thiệu lại cho học sinh nghe

1. Em đã biết gì về GeoGebra?

- Phần mềm GeoGebra dùng để vẽ
các hình hình học đơn giản nh điểm,
đoạn thẳng, đờng thẳng ở lớp 7 em
đã đợc học qua. - - - Đặc điểm quan
trọng nhất của phần mềm Geogebra
là khả năng tạo ra sự gắn kết giữa các
đối tợng hình học, đợc gọi là quan hệ
nh thuộc, vng góc, song song. Đặc
điểm này giúp cho phần mềm có thể
vẽ đợc các hình rất chính xác và có
khả năng tơng tác nh chuyển động
nhng vẫn giữ đợc mối quan hệ giữa
các đối tợng.

Hoạt động2: Làm quen với phần mềm Geogebra. (30’)
Giáo viên cho học sinh quan sát SGK và

giíi thiƯu c¸c bíc.

Để khởi động ta làm nh th no?

Ngoài cách này còn có cách nào nữa
không?

Màm hình của phần mềm GeoGebra tiếng
Việt có những phần nào?

2. Lm quen vi phn mm
GeoGebra ting Việt
a) Khởi động

Nháy chuột tại biểu tợng để
khởi động chơng trình.

b) Giíi thiƯu mµn hình GeoGebra 
tiếng Việt

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

Em hiểu Bảng chọn là gì?

Giáo viên chú ý cho HS.

Thanh cụng c là gì ? Hãy nêu một lệnh bất
kỳ trong thanh ú. (cú th cho HS lờn bng
v)

Giáo viên giới thiệu các công cụ làm việc
chính cho học sinh.

Để chọn một công cụ hÃy nháy chuột lên
biểu tợng của công cụ này.

Mỗi nút trên thanh công cụ sẽ có nhiều
công cụ cùng nhóm. Nháy chuột vào nút
nhỏ hình tam giác phía dới các biểu tợng sẽ
làm xuất hiện các công cụ khác nữa.

Cỏc cụng c liờn quan n i tng im

Bảng chọn là hệ thống các lệnh
chính của phần mềm Geogebra. Với
phần mềm Geogebra tiÕng ViÖt em
sÏ thÊy c¸c lƯnh b»ng tiÕng ViƯt.

Chú ý rằng các lệnh trên bảng chọn
không dùng để vẽ các đối tợng-hình.
Các lệnh tác động trực tiếp với đối
t-ợng hình học đợc thực hiện thông
qua các công cụ trên thanh công cụ
của phần mềm.

 Thanh công cụ của phần mềm
chứa các công cụ làm việc chính.
Đây chính là các công cụ dùng để vẽ,
điều chỉnh và làm vic vi cỏc i
t-ng.

- Khi nháy chuột lên một nút lệnh ta
sẽ thấy xuất hiện các công cụ kh¸c
cïng nhãm.

- Mỗi cơng cụ đều có một biểu tợng
riêng tơng ứng. Biểu tợng cho biết
công dng ca cụng c ú.

c) Giới thiệu các công cơ lµm viƯc 
chÝnh

 Cơng cụ di chuyển có ý
nghĩa đặc biệt là không dùng để vẽ
hoặc khởi tạo hình mà dùng để di
chuyển hình. Với cơng cụ này, kéo
thả chuột lên đối tợng (điểm, đoạn,
đờng, ...) để di chuyển hình này.
Cơng cụ này cũng dùng để chọn các
đối tợng khi thực hiện các lệnh điều
khiển thuộc tính của các đối tợng
này.

Có thể chọn nhiều đối tợng bằng
cách nhấn giữ phím Ctrl trong khi

chän.

Chú ý: Khi đang sử dụng một công
cụ khác, nhấn phím ESC để chuyển về

c«ng cơ di chun.

 Các công cụ liên quan đến đối
tợng điểm

Công cụ dùng để tạo một điểm
mới. Điểm đợc tạo có thể là điểm tự
do trên mặt phẳng hoặc là điểm
thuộc một đối tợng khác (ví dụ đờng
thẳng, đoạn thẳng).

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

t-Các công cụ liên quan đến on, ng
thng

Các công cụ tạo mối quan hƯ h×nh häc

ợng để tạo điểm thuộc đối tợng này.
Cơng cụ dùng để tạo ra điểm là
giao của hai đối tợng đã có trên mặt
phẳng.

Cách tạo: chọn công cụ và lần lợt
nháy chuột chọn hai đối tợng đã có
trên mặt phẳng.

Cơng cụ dùng để tạo trung điểm
của (đoạn thẳng nối) hai điểm cho
tr-ớc: chọn công cụ rồi nháy chuột tại
hai điểm này để tạo trung điểm.

 Các công cụ liên quan đến
đoạn, đờng thẳng

Các công cụ , , dùng

để tạo đờng, đoạn, tia đi qua hai
điểm cho trớc. Thao tác nh sau: chọn
cơng cụ, sau đó nháy chuột chọn lần
lợt hai điểm trên màn hình.

Cơng cụ sẽ tạo ra một đoạn
thẳng đi qua một điểm cho trớc và
với độ dài có thể nhập trực tiếp từ
bàn phím.

Thao tác: chọn cơng cụ, chọn một
điểm cho trớc, sau đó nhập một giá
trị số vào cửa sổ có dạng:

Nháy nút áp dụng sau khi đã nhập

xong độ dài đoạn thẳng.

Chó ý: Trong cửa sổ trên có thể nhập
một chuỗi kí tự là tên cho một giá trị
số.

Các công cơ t¹o mèi quan hƯ
h×nh häc

- Cơng cụ dùng để tạo đờng
thẳng đi qua một điểm và vng góc
với một đờng hoặc đoạn thẳng cho
tr-ớc.

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

Các cơng cụ liên quan đến hình trịn

chän ®iĨm.

- Cơng cụ sẽ tạo ra một đờng
thẳng song song với một đờng (đoạn)
cho trớc và đi qua một điểm cho trớc.

Thao tác: chọn công cụ, sau đó lần
l-ợt chọn điểm, đờng (đoạn, tia) hoặc
ngợc lại chọn đờng (đoạn, tia) và
chọn điểm.

- Công cụ dùng để vẽ đờng
trung trực của một đoạn thẳng hoặc
hai điểm cho trớc.

Thao tác: chọn cơng cụ, sau đó chọn
một đoạn thẳng hoặc chọn hai điểm
cho trớc trên mặt phẳng.

- Công cụ dùng để tạo đờng
phân giác của một góc cho trớc. Góc
này xác định bởi ba điểm trên mặt
phẳng.

Thao tác: chọn công cụ và sau đó lần
lợt chọn ba điểm trên mặt phẳng.
Điểm chọn thứ hai chính là đỉnh của
góc này.

 Các cơng cụ liên quan đến hình
trịn

- Cơng cụ tạo ra hình trịn bằng
cách xác định tâm và một điểm trên
hình trịn. Thao tác: chọn cơng cụ,
chọn tâm hình trịn và điểm thứ hai
nằm trên hình trịn.

- Cơng cụ dùng để tạo ra hình
trịn bằng cách xác định tâm và bán
kính. Thao tác: chọn cơng cụ, chọn
tâm hình trịn, sau đó nhập giá trị bán
kính trong hộp thoại sau:

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

- Cơng cụ dùng để tạo một nửa
hình tròn đi qua hai điểm đối xứng
tâm.

- Thao tác: chọn cơng cụ, chọn lần
l-ợt hai điểm. Nửa hình trịn đợc tạo sẽ
là phần hình trịn theo chiều ngợc
kim đồng hồ từ điểm thứ nhất đến
điểm thứ hai.

- Cơng cụ sẽ tạo ra một cung
trịn là một phần của hình trịn nếu
xác định trớc tâm hình trịn và hai
điểm trên cung trịn này.

- Thao tác: Chọn cơng cụ, chọn tâm
hình trịn và lần lợt chọn hai điểm.
Cung tròn sẽ xuất phát từ điểm thứ
nhất đến điểm thứ hai theo chiều
ng-ợc chiều kim đồng hồ.

- Công cụ sẽ xác định một cung
tròn đi qua ba điểm cho trớc. Thao
tác: chọn cơng cụ sau đó lần lợt chọn
ba điểm trên mặt phẳng.

 Các công cụ biến đổi hình học

- Cơng cụ dùng để tạo ra một
đối tợng đối xứng với một đối tợng
cho trớc qua một trục là đờng hoặc
đoạn thẳng.

- Thao tác: Chọn công cụ, chọn đối
tợng cần biến đổi (có thể chọn nhiều
đối tợng bằng cách kéo thả chuột tạo
thành một khung chữ nhật chứa các
đối tợng muốn chọn), sau đó nháy
chuột lên đờng hoặc đoạn thẳng làm
trục đối xứng.

- Công cụ dùng để tạo ra một
đối tợng đối xứng với một đối tợng
cho trớc qua một điểm cho trớc

(điểm này gọi là tâm đối xứng).

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

chuột lên điểm là tâm đối xứng.

d) C¸c thao t¸c víi tƯp

Mỗi trang hình vẽ sẽ đợc lu lại trong
một tệp có phần mở rộng là ggb. lu

hình hÃy nhấn tổ hợp phím Ctrl+S

hoặc thực hiện lệnh Hồ sơ Lu lại từ

bảng chọn. Nếu là lần đầu tiên lu tệp,
phần mềm sẽ yêu cầu nhập tên tệp.
Gõ tên tệp tại vị trí File name và nháy

chuột vào nút Save.

m mt tệp đã có, nhấn tổ hợp
phím Ctrl+O hoặc thực hiện lệnh Hồ sơ

 Më. Chän tƯp cÇn më hoặc gõ tên

ti ụ File name, sau ú nhỏy chut vo

nút Open.

e) Thoát khỏi phần mềm

Nháy chuột chọn Hồ sơ Đóng hoặc

nhấn tổ hợp phím Alt+F4.

c) Cng c, luyn tp:3

- Giáo viên hệ thống lại toµn bé néi dung bµi häc.

-d) Hướng dẫn HS tự học ở nhà: 2’

- Học bài theo sách giáo khoa và vở ghi, Ơn lại các kiến thức chính đã học và
luyện viết, làm đi làm lại nhiều lần.

- Đọc bài mới để giờ sau học.

Ngày soạn: 25/01/2010 Ngày dạy: 8A: 29/01/2010

8B: 30/01/2010
TiÕt 44: häc vÏ h×nh với phần mềm geogebra (tiếp)

1/ Mục tiêu:

a) Kin thc: Hc sinh nắm đợc các đối tợng của phần mềm hình học
Geogebra. Hiểu rõ đợc các đối tợng đó và danh sách các đối tợng đó
trên màn hình.

b) Kỹ năng: Vận dụng đợc vào vẽ các hình trong thực t.

c) Thỏi : Yêu thích môn học. Có ý thức bảo vệ máy tính khi sử dụng

2/ Chuẩn bị:

a) Chun b ca GV:- Sách giáo khoa, giáo án, tài liƯu tin häc cã liªn quan.

b) Chuẩn bị của HS- Đọc tài liệu ở nhà trớc khi

3/ Tiến trình lªn líp:
a) KiĨm tra. 5’

- Phần mềm Geogebra dùng để làm gì?

...
...

b) Bµi míi: 40’

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

Hoạt động1: Khái niệm đối tợng. (15’)
? Em hiểu thế nào là đối tợng hình

học? a) Khái niệm đối tợng hình họcMột hình hình học sẽ bao gồm nhiều đối 
t-ợng cơ bản. Các đối tt-ợng hình học cơ bản
bao gồm: điểm, đoạn thẳng, đờng thẳng, tia,
hình trịn, cung trịn.

Hoạt động 2: Đối tợng tự do và đối tợng phụ thuộc (25’)
Giáo viên nêu các đối tợng phụ thuộc

vµ cho biÕt ý nghÜa cña nã.

Hiện ẩn danh sách các đối tợng trên
màn hình.

Thay đổi các thuộc tính.

b) Đối tợng tự do và đối tợng phụ thuộc

Em đã đợc làm quen vi khỏi nim quan h

gia cỏc i tng.

Sau đây lµ mét vµi vÝ dơ:

 Điểm thuộc đờng thẳng

Cho trớc một đờng thẳng, sau đó xác định
một điểm "thuộc" đờng thẳng này. Chúng ta
có quan hệ "thuộc". Trong trờng hợp này
đối tợng điểm có quan hệ thuộc đối tng
-ng thng.

Đờng thẳng đi qua hai điểm

Cho trc hai điểm. Vẽ một đờng thẳng đi
qua hai điểm này. Chúng ta có quan hệ "đi
qua". Trong trờng hợp này đờng thẳng có
quan hệ và phụ thuộc vào hai điểm cho trớc.

 Giao của hai đối tợng hình học

Cho trớc một hình trịn và một đờng thẳng.
Dùng công cụ để xác định giao của
đ-ờng thẳng và đđ-ờng trịn. Chúng ta sẽ có
quan hệ "giao nhau". Giao điểm, nếu có,
thuộc hai đối tợng ban đầu là đờng tròn và
đờng thẳng.

Một đối tợng khơng phụ thuộc vào bất
kì một đối tợng nào khác đợc gọi là
đối tợng tự do. Các đối tợng còn lại gọi
là đối tợng phụ thuộc. Nh vậy mọi đối
tợng hình học trong phần mềm

Geogebra đều có thể chia thành hai
loại là tự do hay phụ thuộc.

c) Danh sách các đối tợng trên màn hình

Phần mềm Geogebra cho phép hiển thị danh
sách tất cả các đối tợng hình học hiện đang
có trên trang hình.

Dùng lệnh Hiển thị  Hiển thị danh sách i tng

hiện/ẩn khung thông tin này trên màn h×nh.

d) Thay đổi thuộc tính của đối tợng

Các đối tợng hình đều có các tính chất nh
tên (nhãn) đối tợng, cách thể hiện kiểu

đ-ờng, màu sắc, ....

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

thay đổi tính chất của đối tợng.

 ẩn đối tợng: Để ẩn một đối tợng, thực
hiện các thao tác sau:

1.Nháy nút phải chuột lên đối tợng;

2.Huỷ chọn Hiển thị đối tợng trong bảng

chän:

 ẩn/hiện tên (nhãn) của đối tợng: Để
làm ẩn hay hiện tên của đối tợng, thực hiện
các thao tác sau:

1.Nháy nút phải chuột lên đối tợng
trên màn hình;

2.Hủ chọn Hiển thị tên trong b¶ng

chän.

 Thay đổi tên của đối tợng: Muốn thay
đổi tên của một đối tợng, thực hiện các thao
tác sau:

1.Nháy nút phải chuột lên đối tợng
trên mn hỡnh;

2.Chọn lệnh Đổi tên trong bảng chọn:

Sau ú nhp tên mới trong hộp thoại:

3.Nháy nút áp dụng để thay đổi, nháy

nút Huỷ bỏ nếu không muốn đổi tên.

 Đặt/huỷ vết chuyển động của đối tợng:

Chức năng đặt vết khi đối tợng chuyển động
có ý nghĩa đặc biệt trong các phần mềm
"Toán học động". Chức năng này đợc sử
dụng trong các bài toán dự đoán quĩ tích và
khảo sát một tính chất nào đó của hình khi
các đối tợng khác chuyển động.

Để đặt/huỷ vết chuyển động cho một đối
t-ợng trên màn hình thực hiện thao tác sau:

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

2.Chän Më dÊu vÕt khi di chun.

Để xố các vết đợc vẽ, nhấn tổ hợp phím

Ctrl+F.

 Xố đối tợng: Muốn xố hẳn đối tợng,
ta có thể thực hiện một trong các thao tác
sau:

1.Dùng công cụ chọn đối tợng
rồi nhấn phím Delete.

2.Nháy nút phải chuột lên đối tợng và
thực hiện lệnh Xoá.

3.Chọn công cụ trên thanh công
cụ và nháy chuột lên đối tợng muốn
xố.

c) Cđng cè, luyện tp: 4

- Giáo viên hệ thống lại toàn bộ nội dung bµi häc.

-d) Híng dÉn HS tự học ở nhµ: 1’

- Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học và
luyện viết, làm đi làm lại nhiều lần.

- Häc kÜ lÝ thuyÕt,

- Đọc bài mới để giờ sau học.

Ngày soạn: 29/01/2010 Ngày dạy: 8A: 02/02/2010

8B: 02/02/2010
TiÕt 45: häc vẽ hình với phần mềm geogebra

1/ Mục tiêu:

a) Kin thc: Học sinh nắm đợc các cơng cụ làm việc chính.

b) Kỹ năng:Biết vẽ các hình liên quan đến đối tợng điểm và đờng thẳng.

c) Thái độ: Nghiêm túc, cẩn thn.
2/ Chuẩn bị:

a) Giỏo viờn: - Sách giáo khoa, giáo án, tài liệu tin học có liên quan.

b) Hc sinh: - Đọc tài liệu ở nhà trớc khi

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

a) KiÓm tra. 3’

- KiÓm tra sù chuÈn bị của học sinh .

b) Bài mới: 37

Hot ng ca giỏo viờn v HS Ni dung

Mỗi nút trên thanh công cụ sẽ có nhiều
công cụ cùng nhóm. Nháy chuột vào nút
nhỏ hình tam giác phía dới các biểu tợng
sẽ làm xuất hiện các công cụ khác nữa.

Cỏc công cụ liên quan đến đối tợng
điểm

Các công cụ liên quan đến đoạn, đờng

thẳng

c) Giới thiệu các cơng cụ làm việc chính 
 Cơng cụ di chuyển có ý nghĩa
đặc biệt là khơng dùng để vẽ hoặc khởi
tạo hình mà dùng để di chuyển hình. Với
cơng cụ này, kéo thả chuột lên đối tợng
(điểm, đoạn, đờng, ...) để di chuyển hình
này. Cơng cụ này cũng dùng để chọn các
đối tợng khi thực hiện các lệnh điều
khiển thuộc tính của các đối tợng này.
Có thể chọn nhiều đối tợng bằng cách
nhấn giữ phím Ctrl trong khi chọn.

Chú ý: Khi đang sử dụng một cơng cụ
khác, nhấn phím ESC để chuyển về cơng

cơ di chun.

 Các cơng cụ liên quan đến đối tợng
điểm

Công cụ dùng để tạo một điểm
mới. Điểm đợc tạo có thể là điểm tự do
trên mặt phẳng hoặc là điểm thuộc một
đối tợng khác (ví dụ đờng thẳng, đoạn
thẳng).

Cách tạo: chọn công cụ và nháy chuột
lên một điểm trống trên màn hình hoặc

nháy chuột lên một đối tợng để tạo điểm
thuộc đối tợng này.

Công cụ dùng để tạo ra điểm là
giao của hai đối tợng đã có trên mặt
phẳng.

Cách tạo: chọn công cụ và lần lợt nháy
chuột chọn hai đối tợng đã có trên mặt
phẳng.

Công cụ dùng để tạo trung điểm
của (đoạn thẳng nối) hai điểm cho trớc:
chọn công cụ rồi nháy chuột tại hai điểm
này để tạo trung điểm.

 Các công cụ liên quan đến đoạn, 
đ-ờng thng

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

Các công cụ tạo mối quan hệ hình học

màn hình.

Cụng c s tạo ra một đoạn thẳng
đi qua một điểm cho trớc và với độ dài
có thể nhập trực tiếp từ bàn phím.

Thao tác: chọn cơng cụ, chọn một điểm
cho trớc, sau đó nhập một giá trị số vào
cửa sổ có dạng:

Nháy nút áp dụng sau khi đã nhập xong

dài đoạn thẳng.

Chú ý: Trong cưa sỉ trªn có thể nhập
một chuỗi kí tự là tên cho một giá trị số.

c) Cng c, luyn tp:4

- Giáo viên hệ thống lại toàn bộ nội dung bµi häc.

d)Hướng dẫn HS tự học ở nhà: 1’

- Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học và
luyện viết, làm đi làm lại nhiều lần.

- Đọc trớc các công cụ liên quan đến đờng tròn.

Ngày soạn: 01/02/2010 Ngày dạy: 8A: 05/02/2010

8B: 06/02/2010
Tiết 46: học vẽ hình với phần mỊm geogebra

1/ Mơc tiªu:

a) Kiến thức: Học sinh biết sử dụng các cơng cụ vẽ hình liên quan đến đờng
-ng trũn.

b) K nng: Rèn kỹ năng sử dụng chuột.

c) Thái độ: Nghiêm túc, cẩn thận.
2/ ChuÈn bÞ:

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

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan.

b) Hc sinh:

- Đọc tài liƯu ë nhµ tríc khi

3/ Tiến trình bài dạy:
a) KiĨm tra: 1’

- KiĨm tra sù chn bÞ cđa häc sinh .

b) Dạy nội dung bµi míi: 40’

Hoạt động của giáo viên và HS Nội dung
Các công cụ liên quan n hỡnh trũn

c) Giới thiệu các công cụ làm viƯc 
chÝnh ( 22’)

 Các cơng cụ liên quan đến hình
trịn

- Cơng cụ tạo ra hình tròn bằng
cách xác định tâm và một điểm trên
hình trịn. Thao tác: chọn cơng cụ,
chọn tâm hình trịn và điểm thứ hai

nằm trên hình trịn.

- Cơng cụ dùng để vẽ hình trịn
đi qua ba điểm cho trớc. Thao tác:
chọn cơng cụ, sau đó lần lợt chọn ba
điểm.

- Công cụ dùng để tạo một nửa
hình trịn đi qua hai điểm đối xứng
tâm.

- Thao tác: chọn công cụ, chọn lần
l-ợt hai điểm. Nửa hình trịn đợc tạo sẽ
là phần hình trịn theo chiều ngợc
kim đồng hồ từ điểm thứ nhất đến
điểm thứ hai.

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

- Thao tác: Chọn công cụ, chọn tâm
hình trịn và lần lợt chọn hai điểm.
Cung tròn sẽ xuất phát từ điểm thứ
nhất đến điểm thứ hai theo chiều
ng-ợc chiều kim đồng hồ.

- Cơng cụ sẽ xác định một cung

trịn đi qua ba điểm cho trớc. Thao
tác: chọn công cụ sau đó lần lợt chọn
ba điểm trên mặt phẳng.

 Các cơng cụ biến đổi hình học

- Cơng cụ dùng để tạo ra một
đối tợng đối xứng với một đối tợng
cho trớc qua một trục là đờng hoặc
đoạn thẳng.

- Công cụ dùng để tạo ra một
đối tợng đối xứng với một đối tợng
cho trớc qua một điểm cho trớc
(điểm này gọi là tâm đối xứng).

d) C¸c thao t¸c víi tƯp (18 )’

Mỗi trang hình vẽ sẽ đợc lu lại trong
một tệp có phần mở rộng l ggb. lu

hình hÃy nhấn tổ hợp phím Ctrl+S

hoặc thực hiện lệnh Hồ sơ Lu lạitừ

bảng chọn. Nếu là lần đầu tiên lu tệp,
phần mềm sẽ yêu cầu nhập tên tệp.
Gõ tên tệp tại vị trí File name và nháy

chuột vào nút Save.

m mt tệp đã có, nhấn tổ hợp
phím Ctrl+O hoặc thực hiện lệnh Hồ sơ

 Më. Chän tƯp cÇn më hoặc gõ tên

ti ụ File name, sau ú nhỏy chut vo

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

e) Thoát khỏi phần mềm

Nháy chuét chän Hå s¬  Đóng hoặc

nhấn tổ hợp phím Alt+F4.

c) Cng c, luyn tp:2

- Giáo viên hệ thống lại toàn bộ nội dung bµi häc.

d) Hướng dẫn HS tự học ở nhà: 2’

- Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học và
luyện viết, lm i lm li nhiu ln.

- Đọc phần làm hiện nhÃn và cách lu.

- c trc cỏch xúa i tng , thốt khỏi chơng trình.

Ngày soạn: 05/02/2010 Ngày dạy: 8A: 09/02/2010

8B: 09/02/2010

TiÕt 47

: häc vÏ h×nh víi phần mềm geogebra

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

1. Mục tiêu

a)Kin thc: - Học sinh thực hành đợc các ứng dụng cơ bản của phần mềm vẽ
hình học geogebra.

b) Kỹ năng: - Nắm đợc cách vẽ một hình nào đó khi sử dụng phần mm
geogebra ny.

c) Thỏi : - Hứng thú và yêu thích môn học.

2. Chuẩn bị
a) Giỏo viờn:

Sỏch giỏo khoa, giỏo ỏn, phũng mỏy tớnh hot ng tt.

b) Hc sinh:

Đọc tài liƯu ë nhµ tríc khi.

3. Tiến trình bài dạy:
a) KiĨm tra bài cũ: 5

?Đọc tác dụng của các nút lệnh trên thanh công cụ của phần mềm geogebra?

b) Dy ni dung bµi míi: 35’

1. Vẽ đờng trịn ngoại tiếp tam giác (12 )’

Cho trớc tam giác
ABC. Dùng công cụ
đờng tròn vẽ đờng
tròn đi qua ba điểm
A, B, C.

2. Vẽ đờng tròn nội tiếp tam giác (12 )’
Cho trớc tam giác

ABC. Dùng các công
cụ đờng phân giác,
đờng vng góc và
đờng trịn vẽ đờng
trịn nội tiếp tam giác

ABC.

3. Vẽ hình thoi. (11 )’
Cho trớc cạnh AB và
một đờng thẳng đi qua
A. Hãy vẽ hình thoi
ABCD lấy đờng thẳng
đã cho là đờng chéo. Sử
dụng các cơng cụ thích
hợp đã học để dựng các
đỉnh C, D của hình thoi.

- Thực hiện nghiêm túc
các yêu cầu của giáo
viên.

- HS tích cực thực hành
theo nhóm.

- Thực lu các hình vừa
vẽ.

- Thực hiện vẽ hình
theo yêu cÇu.

- Thực hiện theo nhóm
để hồn thành hình.

- Nhóm nào làm xong
báo cáo kết quả.

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

- Vẽ tam giác cân BAC.

d) Hướng dẫn HS tự học ở nhà: 2’

- Học bài theo sách giáo khoa và vở ghi, Ôn lại các kiến thức chính đã học.
- Đọc các Bài tập thực hành còn lại.

Ngày soạn: 05/02/2010 Ngày dạy: 8A: 23/02/2010

8B: 09/02/2010
TiÕt 48:

häc vẽ hình với phần mềm geogebra (TT)

1. Mục tiêu
a)Kin thc:

- Học sinh thực hành đợc các ứng dụng cơ bản của phần mềm vẽ hình học
geogebra.

b) Kỹ năng:

- Nắm đợc cách vẽ một hình nào đó khi sử dụng phần mềm geogebra này.

c) Thái độ:

- Høng thú và yêu thích môn học.

2. Chuẩn bị ca giỏo viên và học sinh:
a) Giáo viên:

- Sách giáo khoa, giáo án, phịng máy tính hoạt động tốt.

b) Học sinh:

- Học sinh: Đọc tài liệu ở nhà trớc khi.

3. Tin trỡnh bi dy:
a) Kiểm tra bài cũ: 5

?Đọc tác dụng của các nút lệnh trên thanh công cụ của phần mềm geogebra?

b) Dy ni dung bài mới: 35

4. Vẽ hình vuông. (8 )
Sử dụng các công

c thớch hp
v một hình
vng nếu biết
tr-ớc một cạnh.

5. Vẽ tam giác đều. (9 )’

Cho trớc cạnh
BC, hãy vẽ tam
giác đều ABC.

6. Vẽ một hình là đối xứng trục của một đối tợng cho
trớc trên màn hình. (9 )

- Thực hiện nghiêm
túc các yêu cầu của
giáo viên.

- HS tÝch cùc thùc
hµnh theo nhãm.

- Thùc hiƯn lu các
hình vừa vẽ.

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

Cho một hình và một
đ-ờng thẳng trên mặt phẳng.
Hãy dựng hình mới là đối
xứng của hình đã cho qua
trục là đờng thẳng trên.
Sử dụng công cụ đối xứng
trục để vẽ hình.

7. Vẽ một hình là đối xứng qua tâm của một đối tợng
cho trớc trên màn hình. (9 )’

Cho trớc một hình và
một điểm O. Hãy
dựng hình mới là đối
xứng qua tâm O của
hình đã cho. Sử dụng
công cụ đối xứng
tâm để vẽ hình.

- Thực hiện theo

nhóm để hồn
thành hình.

- Nhãm nào làm
xong báo cáo kết
quả.

c) Cng c, luyn tp: 3

- Giáo viên hệ thống lại toàn bộ kiến thức đã học.

d) Hướng dẫn HS tự học ở nhà: 2’

- Häc bài theo sách giáo khoa và vở ghi.
- Đọc trớc Bài 8: lặp với số lần cha biết trớc.

Ngy son: 20/02/2010 Ngày dạy: 8A: 26/02/2010

8B: 23/02/2010
Tiết 49:

Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC
1. Mơc tiªu

a)Kiến thức:

- Biết nhu cầu cần có cấu trúc lặp với số lần chưa biết trước trong ngơn ngữ
lập trình;

- Biết ngơn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để chỉ

dẫn máy tính thực hiện lặp đi lặp lại cơng việc đến khi một điều kiện nào đó được
thoả mãn;

b) Kỹ năng:

- Hiểu hoạt động của câu lệnh lặp với số lần chưa biết trước while...do…

trong Pascal.

c) Thái độ: Nghiêm túc, cẩn thận

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

a) KiĨm tra bµi cị: 7’

Viết thuật tốn tính tổng 100 số tự nhiên đầu tiên 1,2,3,…,99,100
Bước 1. SUM  0; i  0.

Bước 2. i  i + 1.

Bước 3. Nếu i ≤ 100, thì SUM  SUM + i và quay lại bước 2.
Bước 4. Thông báo kết quả và kết thúc thuật toán.

* Đặt vấn đề: Với bài toán trên, trong TP ta sử dụng vịng lặp for…to…do thì
sẽ thực hiện dễ dàng . Nhưng nếu ta thay số 100 bởi n ( tính tổng n số tự nhiên đầu
tiên ) thì ta sẽ gặp nhiều khó khăn trong việc sử dụng vịng lặp for…to…do bởi lúc
này số lần lặp không biết trước. Vậy ta phải làm như thế nào ? Giới thiệu bài mới .
b) Dạy nội dung bµi míi: 35’

Hoạt động của GV và HS Nội dung

+ G : y/c hs đọc ví dụ

1sgk/67

+ Hs : 2-3 hs đọc ví dụ sgk
+ Hs : Chú ý lắng nghe
+ G : Phân tích ví dụ

+ G : Hướng dẫn hs xây
dựng thuật toán

+ Hs : Nghe giáo viên hướng
dẫn, sau đó tự xây dựng
thuật toán

+ G : Chạy tay cho học sinh
xem ( Chỉ nên chạy tay thử
từ 1 đến 10 )

+ Hs : Chú ý nghe .
Hs ghi vở ví dụ 2

+ G : Giới thiệu sơ đồ khối

1. Các hoạt động lặp với số lần chưa biết trước
(18’)

a/ Ví dụ 1(sgk).

b/ Ví dụ 2 : Nếu cộng lần lượt n số tự nhiên đầu tiên
(n = 1, 2, 3,...), Cần cộng bao nhiêu số tự nhiên đầu
tiên để ta nhận được tổng Tn nhỏ nhất lớn hơn 1000?

Giải :

Kí hiệu S là tổng cần tìm và ta có thuật tốn như
sau:

+ Bước 1. S  0, n  0.

+ Bước 2. Nếu S ≤ 1000, n  n + 1; ngược lại
chuyển tới bước 4.

+ Bước 3. S  S + n và quay lại bước 2.

+ Bước 4. In kết quả : S và n là số tự nhiên nhỏ nhất
sao cho S > 1000. Kết thúc thuật toán.

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

+ G : Nêu nhận xét

+ G : Có thể sử dụng lệnh
lặp với số lần lặp chưa biết
trước trong các chương trình
lập trình . Sau đây ta xét câu
lệnh và ví dụ trong TP

+ G : Giới thiệu cú pháp
lệnh

while … do ….;

+ G : Xét ví dụ 3

Chúng ta biết rằng, nếu n
càng lớn thì 1

n càng nhỏ,

nhưng luôn luôn lớn hơn 0.
Với giá trị nào của n thì 1

n <

0.005 hoặc 1

n < 0.003 ?

+ Hs : Đọc ví dụ 3

(Gv đưa phim trong ví dụ 3)
+ Hs : quan sát

+ G : giới thiệu chương trình
mẫu sgk ( Giáo viên in
chương trình mẫu trên phim
trong )

+ G : Chạy tay cho học sinh
xem

+ G : Yêu cầu học sinh mở
máy tính và mở chương trình

ví dụ 3 ( giáo viên chuẩn bị
chương trình mẫu và đưa lên
các máy )

+ G : Cho học sinh chạy

* Nhận xét : Để viết chương trình chỉ dẫn máy tính
thực hiện các hoạt động lặp như trong các ví dụ trên,
ta có thể sử dụng câu lệnh có dạng lặp với số lần
chưa biết trước

2. Ví dụ về lệnh lặp với số lần chưa biết trước
(17’)

Trong Pascal câu lệnh lặp với số lần chưa biết trước
có dạng:

while <điều kiện> do <câu lệnh>;
trong đó:

- điều kiện thường là một phép so sánh;
- câu lệnh có thể là câu lệnh đơn giản hay

câu lệnh ghép.

Câu lệnh lặp này được thực hiện như sau:
Bước 1 : Kiểm tra điều kiện.

Bước 2 : Nếu điều kiện SAI, câu lệnh sẽ bị bỏ qua
và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện
đúng, thực hiện câu lệnh và quay lại bước 1.

Ví dụ 3.

Với giá trị nào của n ( n>o ) thì 1

n < 0.005 hoặc

n

< 0.003? Chương trình dưới đây tính số n nhỏ nhất
để 1

n nhỏ hơn một sai số cho trước :

uses crt;

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

chương trình trên máy

+ G : Yêu cầu hs thay điều
kiện sai_so = 0.003 thành
0.002 ; 0.001 ; 0.005 ; ...
+ Hs : thực hiện

n: integer;

const sai_so=0.003;

begin

clrscr;
x:=1; n:=1;

while x>=sai_so dobegin n:=n+1; x:=1/n end;
writeln('So n nho nhat de 1/n < ',sai_so:5:4, 'la
',n);

readln

end.

c) Củng cố, luyện tập: 2’

- Giáo viên hệ thống lại toàn bộ kiến thức đã học.

d) Hướng dẫn HS tự học ở nhà: 1’

- Häc bài theo sách giáo khoa và vở ghi.
- Làm bài tập 1, 2, 3 SGK trang71.

- Đọc trớc Bài 8: lặp với số lần cha biết trớc.

Ngy son: 23/02/2010 Ngày dạy: 8A: 27/02/2010

8B: 27/02/2010
Tiết 50:

Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC
(Tiếp theo)

1. Mơc tiªu
a)Kiến thức:

- Biết nhu cầu cần có cấu trúc lặp với số lần chưa biết trước trong ngơn ngữ
lập trình;

- Biết ngơn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để chỉ
dẫn máy tính thực hiện lặp đi lặp lại cơng việc đến khi một điều kiện nào đó được
thoả mãn;

b) Kỹ năng:

- Hiểu hoạt động của câu lệnh lặp với số lần chưa biết trước while...do…

trong Pascal.
c) Thái độ:

- Nghiêm túc, cẩn thận

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

b) Học sinh: Sách, vởđọc trước bài ở nhà.

3. Tiến trình bi dy:
a) Kiểm tra bài cũ: 15

Câu 1: Viết cú pháp câu lệnh lặp với số lần cha biết trớc rồi giải thích?
Câu 2: Làm bài tập 2 trang 71.

Đáp ¸n:

Câu 1: Viết đúng cú pháp 5đ.
Câu 2: Làm đúng bài tập 5đ.

b) Dạy nội dung bµi míi: 25’

+ G : ta tiếp tục xét các ví dụ mà trong
chương trình có câu lệnh với số lần lặp
chưa biết trước

+ G : Chạy tay cho học sinh xem
+ Hs : chú ý nghe .

+ G : Cho học sinh chạy chương trình
trên máy

+ Hs : thực hiện

+ G : chạy chương trình này, ta nhận
được giá trị ntn?

+ Hs : Nếu chạy chương trình này ta sẽ
nhận được n = 45 và tổng đầu tiên lớn
hơn 1000 là 1034.

Viết chương trình tính tổng

1 1 1

1 ...

2 3 100

T     

+ G : Cho học sinh quan sát.
+ Hs : quan sát

+ G : Chạy tay ( cả hai chương trình )
cho học sinh xem

+ Hs : chú ý nghe và tự chạy tay lại
+ G : so sánh kết quả khi chạy hai
chương trình

+ Hs : Kết quả bằng nhau

2. Ví dụ về lệnh lặp với số lần chưa
biết trước (tt) (17’)

Ví dụ 4 . Chương trình Pascal dưới đây
thể hiện thuật tốn tính số n trong ví dụ
2:

var S,n: integer;

begin

S:=0; n:=1;

while S<=1000 do

begin n:=n+1; S:=S+n end;

writeln('So n nho nhat de tong > 1000
la ',n);

writeln('Tong dau tien > 1000 la ',S);

end.

Ví dụ 5. Viết chương trình tính tổng

1 1 1

1 ...

2 3 100

T     

Để viết chương trình tính tổng

1 1 1

1 ...

2 3 100

T      ta có thể sử dụng
lệnh lặp với số lần lặp biết trước for…
do:

T:=0;

for i:=1 to 100 do T:=T+1/i;
writeln(T);

Nếu sử dụng lệnh lặp while…do, đoạn
chương trình dưới đây cũng cho cùng
một kết quả:

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

+ G : Ví dụ này cho thấy rằng chúng ta
có thể sử dụng câu lệnh while…do thay
cho câu lệnh for…do.

+ G : Giới thiệu phần 3

+ G : Khi viết chương trình sử dụng cấu
trúc lặp cần chú ý tránh tạo nên vòng lặp
không bao giờ kết thúc

+ Hs : Chú ý nghe

+ G : Chẳng hạn, chương trình dưới đây
sẽ lặp lại vô tận:

+ Hs : Chú ý nghe

var a:integer;

begin

a:=5;

while a<6 do writeln('A');

end.

+ G : Trong chương trình trên, giá trị
của biến a luôn luôn bằng 5, điều kiện
a<6 luôn luôn đúng nên lệnh
writeln('A') luôn được thực hiện.

Do vậy, khi thực hiện vòng lặp, điều
kiện trong câu lệnh phải được thay đổi
để sớm hay muộn giá trị của điều kiện
được chuyển từ đúng sang sai. Chỉ như
thế chương trình mới khơng "rơi" vào
những "vịng lặp vô tận".

i:=1;

while i<=100 do begin T:=T+1/i; i:=i+1

end;

writeln(T);

* Nhận xét : Ví dụ này cho thấy rằng
chúng ta có thể sử dụng câu lệnh
while…do thay cho câu lệnh for…do.

3. Lặp vô hạn lần – Lỗi lập trình cần
tránh (8’)

Khi viết chương trình sử dụng cấu trúc
lặp cần chú ý tránh tạo nên vịng lặp
khơng bao giờ kết thúc.

c) Củng cố, luyện tập: 3’

- Giáo viên hệ thống lại toàn bộ kiến thức đã học.

d) Hướng dẫn HS tự học nh: 2

- Học bài theo sách giáo khoa và vë ghi.
- Lµm bµi tËp 4, 5 SGK trang71.

Ngày soạn: 28/02/2010 Ngày dạy: 8A: 04/03/2010

8B: 03/03/2010

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

a)Kiến thức: Viết chương trình Pascal sử dụng câu lệnh lặp với số lần biết trước.
b) Kỹ năng: Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp
các câu lệnh.

c) Thái độ : Nghiêm túc

2. ChuÈn bÞ của giáo viên và học sinh:
a) Giáo viên:giáo án, máy chiếu

b) Học sinh: Kiến thức cũ, sách, vở.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị:

b) Dạy nội dung bµi míi: 40’

Hoạt động của GV và HS Nội dung

GV: Đưa ra các bài tập ở SGK và gọi học
sinh lên bảng trả lời.

Bài 2: Câu lệnh lặp có tác dụng làm đơn
giản và giảm nhẹ công sức của người viết
chương trình.

Bài 3: Chúng ta nói rằng khi thực hiện các
hoạt động lặp, chương trình kiểm tra một
điều kiện. Với lệnh lặp

for <biến đếm> := <giá trị đầu> to
<giá trị cuối> do <câu lệnh>;

của Pascal, điều kiện cần phải kiểm tra
chính là giá trị của biến đếm lớn hơn giá trị
cuối. Nếu điều kiện không được thoả mãn, 
câu lệnh được tiếp tục thực hiện; ngược lại,

chuyển sang câu lệnh tiếp theo trong

chương trình.
Bài 4: 12

Bài 5: Trừ d), tất cả các câu lệnh đều không
hợp lệ:

a) Giá trị đầu phải nhỏ hơn giá trị cuối; 
b) Các giá trị đầu và giá trị cuối phải là số 
nguyên;

c) Thiếu dấu hai chấm khi gán giá trị đầu; 
d) Thừa dấu chấm phẩy thứ nhất, nếu như 
ta muốn lặp lại câu lệnh writeln('A') mười
lần, ngược lại câu lệnh là hợp lệ;

e) Biến x đã được khai báo như là biến có 
dữ liệu kiểu số thực và vì thế không thể
dùng để xác định giá trị đầu và giá trị cuối
trong câu lệnh lặp.

Bài 6: Thuật toán tính tổng

1.Cho một vài ví dụ về hoạt động
được thực hiện lặp lại trong cuộc
sống hằng ngày. (5’)

2.Hãy cho biết tác dụng của câu
lệnh lặp. (5’)

3.(5’) Khi thực hiện câu lệnh lặp,
chương trình kiểm tra một điều
kiện. Với lệnh lặp

i. for <biến đếm> :=
<giá trị đầu> to
<giá trị cuối> do 
<câu lệnh>;

ii. của Pascal, điều kiện
cần phải kiểm tra là
gì?

4.(5’) Chương trình Pascal sau đây
thực hiện gì?

var i: integer;
begin

for i:=1 to 1000 do;
end.

5.(10’) Các câu lệnh Pascal sau có
hợp lệ khơng, vì sao?

a.for i:=100 to 1 do 
writeln('A');

b.for i:=1.5 to 10.5

do writeln('A');
c.for i=1 to 10 do

writeln('A');

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

A = ... ( 1 1)
5
.
3
1
4
.
2
1
3
.
1
1




n
n
Bước 1. Gán A  0, i  1.
Bước 2. A  i i( 12)

 .
Bước 3. i  i + 1.

Bước 4. Nếu i  n, quay lại bước 2.
Bước 5. Ghi kết quả A và kết thúc thuật 
toán.

e.var x: real; begin 
for x:=1 to 10 do 
writeln('A'); end.
6. (10’) Hãy mô tả thuật tốn để

tính tổng sau đây:

i. A =

1 1 1 1

...

1.32.43.5 n n( 1).

c) Củng cố, luyện tập: 3’

- Hiểu các hoạt động lặp với số lần biết trước
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà xem lại bài học tiết sau chúng ta học tiếp.

Ngày soạn: 01/93/2010 Ngày dạy: 8A: 06/03/2010

8B: 04/03/2010

Tiết 52

Bài tập (T2)

1. Mục tiêu

a)Kin thc: - Vit chng trình Pascal sử dụng câu lệnh lặp với số lần chưa biết 
trước.

b) Kỹ năng:- Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp
các câu lệnh.

c) Thái độ: Nghiêm túc

2. ChuÈn bÞ của giáo viên và học sinh:
a) Giáo viên: giáo án, máy chiếu

b) Học sinh: Kiến thức cũ, sách, vở.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị:

b) Dạy nội dung bµi míi: 40’

Hoạt động của GV và HS Nội dung

GV: Đưa ra các bài tập ở SGK và gọi
học sinh lên bảng trả lời.

Bài 2: Sự khác biệt:

a) Ccâu lệnh lặp với số lần lặp cho

trước chỉ thị cho máy tính thực hiện
một lệnh hoặc một nhóm lệnh với số
lần đã được xác định từ trước, còn với
câu lệnh lặp với số lần lặp chưa biết
trước thì số lần lặp chưa được xác định

1) Nêu một vài ví dụ về hoạt động lặp với
số lần chưa biết trước!

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

trước.

b)Lệnh lặp với số lần cho trước, điều
kiện là giá trị của một biến đếm có giá
trị nguyên đã đạt được giá trị lớn nhất
hay chưa, còn trong câu lệnh lặp với số
lần lặp chưa biết trước, điều kiện tổng
quát hơn nhiều, có thể là kiểm tra một
giá trị của một số thực

c) Lệnh lặp với số lần cho trước, câu
lệnh được thực hiện ít nhất một lần, sau
đó kiểm tra điều kiện. Lệnh lặp với số
lần chưa xác định trước, trước hết điều
kiện được kiểm tra. Nếu điều kiện được
thoả mãn, câu lệnh mới được thực hiện.
Bài 3: a) Thuật toán 1: 10 vòng lặp
được thực hiện. Khi kết thúc thuật toán
S = 5.0. Đoạn chương trình Pascal
tương ứng:

S:=10; x:=0.5;
while S>5.2 do 
S:=S-x;

writeln(S);

b) Thuật tốn 2: Khơng vịng lặp nào 
được thực hiện vì ngay từ đầu điều kiện
đã không được thỏa mãn nên các bước
2 và 3 bị bỏ qua. S = 10 khi kết thúc
thuật tốn. Đoạn chương trình Pascal
tương ứng:

S:=10; n:=0;
while S<10 do
 begin n:=n+3; 
S:=S-n end;

writeln(S);

Bài 4: a) Chương trình thực hiện 5 vịng
lặp. b) Vòng lặp trong chương trình
được thực hiện vơ tận vì sau câu lệnh
n:=n+1; câu lệnh lặp kết thúc nên
điều kiện S=0 luôn luôn được thỏa
mãn.

Bài 5: a) Thừa dấu hai chấm trong điều
kiện; b) Thiếu dấu hai chấm trong câu
lệnh gán; c) Thiếu các từ khóa begin

và end trước và sau các lệnh

3) Hãy tìm hiểu các thuật tốn sau đây và
cho biết khi thực hiện thuật toán, máy tính sẽ
thực hiện bao nhiêu vịng lặp? Khi kết thúc,
giá trị của S bằng bao nhiêu? Viết chương
trình Pascal thể hiện các thuật tốn đó.

a) Thuật tốn 1

Bước 1. S  10, x  0.5.

Bước 2. Nếu S  5.2, chuyển tới
bước 4.

Bước 3. S  S  x và quay lại bước
2.

Bước 4. Thơng báo S và kết thúc 
thuật tốn.

b) Thuật toán 2

Bước 1. S  10, n  0.

Bước 2. Nếu S ≥ 10, chuyển tới 
bước 4.

Bước 3. n  n + 3, S  S  n quay
lại bước 2.

Bước 4. Thông báo S và kết thúc 
thuật tốn.

4) Hãy tìm hiểu mỗi đoạn lệnh sau đây và
cho biết với đoạn lệnh đó chương trình thực
hiện bao nhiêu vòng lặp? Hãy rút ra nhận
xét của em.

a) S:=0; n:=0;
while S<=10 do
begin n:=n+1;
S:=S+n end;

b) S:=0; n:=0;
while S<=10 do
n:=n+1; S:=S+n;
5) Hãy chỉ ra lỗi trong các câu lệnh sau

đây:

a)X:=10; while X:=10 do
X:=X+5;

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

n:=n+1; S:=S+n, do đó vịng lặp
trở thành vô tận.

n:=n+1; S:=S+n;
c) Củng cố, luyện tập: 3’

- Hiểu các hoạt động lặp với số lần chưa biết trước
- Biết sử dụng câu lệnh while..do

d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà xem lại bài học tiết sau chúng ta học tiếp.

Ngày soạn: 06/03/2010 Ngày dạy: 8A: 11/03/2010

8B: 10/03/2010

TiÕt 53:

Bµi thùc hµnh 6:

Sư dơng lƯnh While do

…

1. Mơc tiªu 
a)Kiến thức:

- Vận dụng kiến thức của vòng lặp while ... do để viết chơng trình. Biết lựa
chọn câu lệnh lặp while ... do hoặc For ... do cho phù hợp với tình huống cụ thể.

b) Kỹ năng:

- Rèn luyện kỹ năng về khai báo và sử dụng biến, kĩ năng đọc hiểu chơng trình.
Biết vai trị của việc kết hợp các cấu trúc điều khiển.

c) Thái độ:

- Thái độ học tập nghiêm túc, tích cực làm các bài tập thực hành.

2. ChuÈn bÞ của giáo viên và học sinh:

a) Giáo viên: Giáo án, phịng máy tính, sgk.
b) Học sinh: Kiến thức cũ, sgk.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cũ: 5

? Viết cú pháp của câu lệnh lặp while ... do vµ For ... do?

* Đặt vấn đề: Chúng ta đã nghiên cứu lý thuyết về vòng lặp While ... do. để biết
vòng lặp chạy nh thế nào thì hơm nay chúng ta cùng nhau đi vào tiết thực hành.

b) Dạy nội dung bµi míi: 35’

Gọi Hs đọc bài toán và nêu u cầu bài tốn.

? Làm thế nào để tính trung bình n số thực x1, x2, . .
., xn

? D÷ liệu đầu vào (Input) của bài toán là gì

? Dữ liệu đầu ra (Output) của bài toán là gì
Gọi Hs nêu thuật toán.

Gv nhận xét và đa ra thuật toán.

? Dựa vào việc thuật toán ở trên, theo em cần khai
báo những biến gì cho chơng trình bài toán.

Gv kết luận và đa ra chơng trình trình nh Sgk.

? Tìm hiểu ý nghĩa từng câu lệnh.

Gv mụ phỏng hoạt động chính của chơng trình với n
= 3

u cầu Hs hoạt động nhóm để thực hiện các cơng
việc sau:

+ Gõ và lu chơng trình với tên Tinh_TB.

+ Dịch và sửa lỗi nếu có và chạy với bé sè d÷ liƯu

D·y sè thùc x1, x2, . . ., xn

Giá trị trung bình
(x1+x2+. . . +xn) / n

Hs nêu thuật toán.

Hs trả lời.

Hs lm vic theo nhúm cử đại
diện báo cáo.

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

tuỳ ý đề kiểm tra kết quả nhận đợc.

+ Thư viÕt l¹i chơng trình bằng cách sử dụng câu
lệnh For...do thay cho câu lệnh while . . . do.

? Khi nào ta dùng câu lệnh For . . . do và khi nào ta

dùng câu lệnh While . . . do

kin đã biết trớc thì sử dụng
câu lệnh lặp For . . . do, còn
khi lặp với số lần cha biết trớc
thì sử dụng câu lệnh lặp
While . . . do

c) Củng cố, luyện tập: 3’

- Nhận xét toàn bộ kiến thức chính đã học trong giờ.
- Nhận xét đánh giá giờ thực hành.

d) Hướng dẫn HS tự học ở nhà: 2’
- Chuẩn bị bài cho tiết sau.

- Ơn lại câu lệnh và tập viết một số chơng trình đơn giản.

Ngày soạn: 06/03/2010 Ngày dạy: 8A: 13/03/2010

8B: 11/03/2010

TiÕt 54:

Bµi thùc hµnh 6:

Sư dơng lƯnh While do

…

1. Mơc tiªu 
a)Kiến thức:

b) Kỹ năng:

- Rèn luyện kỹ năng về khai báo và sử dụng biến, kĩ năng đọc hiểu chơng
trình. Biết vai trị của việc kết hợp các cấu trúc điều khiển.

c) Thái độ:

- Thái độ học tập nghiêm túc, tích cực làm các bài tập thực hành.

2. ChuÈn bÞ của giáo viên và học sinh:
a) Giáo viên: Giáo án, phịng máy tính, sgk.
b) Học sinh: Kiến thức cũ, sgk.

3. Tiến trình bài dạy:
a) KiĨm tra bài cũ: 5

?Nêu ý nghĩa của câu lệnh lặp while ... do vµ For ... do?
?Em hiĨu thÕ nµo là một số nguyên tố?

b) Dy ni dung bi mi: 35’
- Yêu cầu HS đọc Bài tập 2.

- Giảng giải cho hs hiểu đợc ý tởng để
giải quyết bài toán.

Thảo luận nhóm để làm các việc sau:
+ Xác định Input v Output.

+ Mô tả thuật toán.

- Thực hiện viết chơng trình trên máy tính.

- Thực hiện nghiêm túc yêu cầu cđa gv.
- Chó ý nghe gi¶ng.

- Tích cực hoạt đơng hồn thành u cầu
của gv.

- Hoµn thiện chơng trình, nếu có lỗi tiến
hành chỉnh sưa.

- Chạy chơng trình với các dữ liệu khác
nhau để kiểm tra.

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

c) Củng cố, luyện tập: 3’

- Nhận xét toàn bộ kiến thức chính đã học trong giờ.
- Nhận xét đánh giá giờ thực hành.

d) Hướng dẫn HS tự học ở nhà: 2’

- Ơn lại tồn bộ kiến thức đã học.

Ngày soạn: 13/03/2010 Ngày dạy: 8A: 18/03/2010

8B: 17/03/2010

Tiết 55

KIỂM TRA 1 TIẾT

1. Mục tiêu bài kiểm tra:

a)Kiến thức - Hệ thống lại các kiến thức đã học.
b) Kỹ năng:

- Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết hợp các câu
lệnh.

c) Thái độ: Nghiêm túc
2. Nội dung đề:

Đề số 1:

Phần I. PHẦN TRẮC NGHIỆM: Khoanh trịn vào chữ cái đứng trước phương án
đúng (3 điểm)

Câu 1: Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc
lặp For có một lệnh con?

A. For i:=1 to 100 do a:=a-1; B. For i:=1 to 100 do; a:=a-1;
C. For i:=1 to 100 do a:=a-1 D. For i:=1; to 100 do a:=a-1;

Câu 2: Trong lệnh lặp For…to…do của Pascal, trong mỗi vòng lặp biến đếm thay đổi
như thế nào?

A. +1 B. -1

C. Một giá trị bất kì D. Một giá trị khác 0

Câu 3: Trong ngơn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc
lặp While … do ?

A. x:=10; while x:=10 do x:=x+5; C. x=10; while x:=10 do x:=x+5;
B. x:=10; while x:=10 do x=x+5; D. x:=10; while x=10 dox:=x+5;
Câu 4: Sau khi thực hiện xong đoạn chương trình sau:

j:=3; k:=2;

for i:=1 to 4 do

j:=j+4; k:=k+j;
giá trị của biến k là?

A. 16 B. 21 C. 19 D. 20

Câu 5: Cho đoạn lệnh sau đây:
x:= 2; tong:=4;

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

x:=tong;

Sau khi đoạn lệnh trên được thực hiện x nhận giá trị là?

A. 13 B. 14 C. 15 D. 16

Câu 6: Đoạn lệnh sau đây: 
so:=1;

While so<10 do writeln(so);

so:=so+1;

sẽ cho kết quả gì?

A. In ra các số từ 1 đến 9.
B. In ra các số từ 1 đến 10.

C. In ra vô hạn các số 1, mỗi số trên 1 dòng.
D. Tất cả a, b, c và d đều sai.

Phần II. PHẦN TỰ LUẬN (7đ):

Câu 1. Hãy viết lại chương trình đúng từ chương trình có lỗi sau: (3 điểm)

Program bang cuu chuong;

var N,i:integer;

begen

write('Nhap so N='); readln(N);
writeln

writeln('Bang nhan ' N);

for i:=10 to 1 do

writeln(N,' x ',i:2,' = ',Ni:3);
readln

end.

Câu 2: (4 điểm) Tìm hiểu các đoạn chương trình Pascal sau đây. Cho biết đoạn lệnh đó

chương trình thực hiện bao nhiêu vịng lặp, khi kết thúc giá trị của biến S bằng bao nhiêu?
a) s:=1; n:=3;

while s<8 do

begin n:=n+1; s:=s+n end;
b) s:=3; n:=1;

while s<15 do

begin n:=n+3; s:=s+n end;

Đề số 2:

I. PHẦN TRẮC NGHIỆM: Khoanh trịn vào chữ cái đứng trước phương án đúng
(3 điểm)

Câu 1: Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc
lặp For có một lệnh con?

A. For i:=1; to 100 do a:=a-1; B. For i:=1 to 100 do; a:=a-1;
C. For i:=1 to 100 do a:=a-1 D. For i:=1 to 100 do a:=a-1;

Câu 2: Trong lệnh lặp For…to…do của Pascal, trong mỗi vòng lặp biến đếm thay đổi
như thế nào?

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

C. Một giá trị bất kì D. Một giá trị khác 0

Câu 3: Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc
lặp While … do ?

A. x:=10; while x:=10 do x:=x+5; C. x=10; while x:=10 do x:=x+5;
B. x:=10; while x:=10 do x=x+5; D. x:=10; while x=10 dox:=x+5;
Câu 4: Sau khi thực hiện xong đoạn chương trình sau:

j:=3; k:=2;

for i:=1 to 4 do

j:=j+4; k:=k+j;
giá trị của biến k là?

A. 16 B. 21 C. 19 D. 20

Câu 5: Cho đoạn lệnh sau đây:
x:= 2; tong:=4;

While tong<14 do tong:=tong+3;
x:=tong;

Sau khi đoạn lệnh trên được thực hiện x nhận giá trị là?

A. 13 B. 14 C. 15 D. 16

Câu 6: Đoạn lệnh sau đây: 
so:=1;

While so<10 do writeln(so);
so:=so+1;

sẽ cho kết quả gì?

B. In ra các số từ 1 đến 9.
C. In ra các số từ 1 đến 10.

D. In ra vô hạn các số 1, mỗi số trên 1 dòng.
E. Tất cả a, b, c và d đều sai.

Phần II. PHẦN TỰ LUẬN (7đ): (Tương tự đề số 1)
3. Đáp án:

Đề số 1:

Phần I: Mỗi câu trả lời đúng tính 0,5 điểm

Câu 1: A; Câu 2: A; Câu 3: D Câu 4: B Câu 5: D Câu 6: C
Đề số 2:

Phần I: Mỗi câu trả lời đúng tính 0,5 điểm

Câu 1: D; Câu 2: B; Câu 3: D Câu 4: B Câu 5: D Câu 6: C
Phần II: Tự luận:

Câu 1.

Program bang_cuu_chuong;

var N,i:integer;
begin

write('Nhap so N='); readln(N);
writeln;

writeln('Bang nhan ', N);
for i:=1 to 10 do

writeln(N,' x ',i:2,' = ',N*i:3);
readln

end.

3 đ
(0,5 ñ)
(0,5 ñ)
(0,5 ñ)
(0,5 ñ)
(0,5 ñ)
(0,5 ñ)

Câu 2. 4 đ

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

ĐK: s<8  1<8  Đúng  Câu lệnh được thực hiện: n=n+1=3+1=4
s=s+n =1+4=5

5<8 Đúng  Thực hiện tính: n=n+1=4+1=5, s=s+n=5+5=10
10<8 Sai  kết thúc vòng lặp.

Đoạn lệnh trên máy tính thực hiện 2 vịng lặp, khi kết thúc s=10.
b) s=3; n=1;

ĐK: s<15  3<15  Đúng  Câu lệnh được thực hiện: n=n+3=1+3=4
s=s+n=3+4=7
7<15 Đúng  Thực hiện tính: n=n+3=4+3=7, s=s+n=7+7=14
14<15 Đúng  Thực hiện tính: n=n+3=7+3=10, s=s+n=14+10=24
24<15 Sai  kết thúc vòng lặp.

Đoạn lệnh trên máy tính thực hiện 3 vịng lặp, khi kết thúc s=24.

2 đ

4. ánh giá nh n xét sau khi ch m b i ki m tra:Đ ậ ấ à ể

Ngày soạn: 13/03/2010 Ngày dạy: 8A: 20/03/2010

8B: 18/03/2010

Tiết 56

Lµm viƯc víi d·y sè

1. Mục tiêu :

a) Kiến thức

- Biết được khái niệm mảng một chiều

- Biết cách khai báo mảng, nhập, in, truy cập các phần tử của mảng

b) Kỹ Năng

- Hiểu thuật tốn tìm số lớn nhất, nhỏ nhất của một dãy số.
c) Thái độ: Nghiêm túc

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: giáo án, máy chiếu
b) Học sinh: Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a) KiĨm tra bµi cị:

b) Dạy nội dung bµi míi: 40’

Hoạt động của GV và HS Nội dung

Hoạt đ ộng 1: 20’

GV: Đưa ví dụ 1 SGK để
giới thiệu cho học sinh cách

1. Dãy số và biến mảng

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

sử dụng biến mảng như thế
nào

HS: Chú ý lắng nghe

GV: Phân tích bài toán để
học sinh hiểu rõ hơn vấn đề

GV: để giải quyết các vấn đề
trên chúng ta cần có dữ liệu
gì:

HS: Biến mảng

GV: Việc sắp xếp thứ tự như
thế nào?

HS: Bằng cách gán gán cho
mỗi phần tử 1 chỉ số

GV: Giá trị của mảng như
thế nào?

HS: Là một biến nguyên
Hoạt đ ộng 2: 20’

GV: Đưa ra ví dụ về biến
mảng

HS: Chú ý ví dụ

GV: Đưa ra cách khai bái
biến mảng trong Pascal

báo và nhập dữ liệu dạng sau đây, mỗi câu lệnh
tương ứng với điểm của một học sinh:

Var Diem_1, Diem_2, Diem_3,… : 
real;

Read(Diem_1); Read(Diem_2),
Read(Diem_3);…

Nếu số học sinh trong lớp càng nhiều thì đoạn khai
báo và đọc dữ liệu trong chương trình càng dài.
Giả sử chúng ta có thể lưu nhiều dữ liệu có liên
quan với nhau (như Diem_1, Diem_2, Diem_3,... ở
trên) bằng một biến duy nhất và đánh "số thứ tự"
cho các giá trị đó, ta có thể sử dụng quy luật tăng
hay giảm của "số thứ tự" và một vài câu lệnh lặp để
xử lí dữ liệu một cách đơn giản hơn, chẳng hạn:

- Với i = 1 đến 50: hãy nhập Diem_i;

- Với i = 1 đến 50: hãy so sánh Max với
Diem_i;

Để giúp giải quyết các vấn đề trên, một kiểu dữ liệu
được gọi là kiểu mảng.

Dữ liệu kiểu mảng là một tập hợp hữu hạn các phần
tử có thứ tự, mọi phần tử đều có cùng một kiểu dữ
liệu, gọi là kiểu của phần tử. Việc sắp thứ tự được
thực hiện bằng cách gán cho mỗi phần tử một chỉ
số:

Hình 40

Khi khai báo một biến có kiểu dữ liệu là kiểu
mảng, biến đó được gọi là biến mảng.

Giá trị của biến mảng là một mảng, tức một dãy số
(số nguyên, hoặc số thực) có thứ tự, mỗi số là giá
trị của biến thành phần tương ứng.

2. Ví dụ về biến mảng

Để làm việc với các dãy số nguyên hay số thực,
chúng ta phải khai báo biến mảng

Ví dụ, cách khai báo đơn giản một biến mảng trong
ngôn ngữ Pascal như sau:

var Chieucao: array[1..50] of 
real;

var Tuoi: array[21..80] of 
integer;

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

HS: Chú ý và ghi vở có kiểu số thực. Với câu lệnh khai báo thứ hai, ta
có biến Tuoi gồm 60 phần tử (từ 21 đến 80) có kiểu
số nguyên.

Cách khai báo mảng trong Pascal như sau:
Tên mảng : array[<chỉ số đầu>.. <chỉ số
cuối>] of <kiểu dữ liệu>

trong đó chỉ số đầu và chỉ số cuối là hai số nguyên
hoặc biểu thức nguyên thoả mãn chỉ số đầu ≤ chỉ
số cuối và kiểu dữ liệu có thể là integer hoặc real.
c) Củng cố, luyện tập: 3’

- Khái niệm mảng một chiều

- Cách khai báo mảng, nhập, in, truy cập các phần tử của mảng
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà xem lại bài học tiết sau chúng ta học tiếp.

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

Tiết 57

Bài 9

: lµm viƯc víi d·y sè (

Tiếp

)

1. Mục tiêu :

a) Kiến thức

- Biết được khái niệm mảng một chiều

- Biết cách khai báo mảng, nhập, in, truy cập các phần tử của mảng
b) Kỹ Năng : - Hiểu thuật tốn tìm số lớn nhất, nhỏ nhất của một dãy số.
c) Thái độ: Nghiêm túc

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: giáo án, máy chiếu
b) Học sinh: Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a) KiĨm tra bµi cị: 3’

? Em hãy nêu cách khai báo biến mảng trong Pascal .
b) Dạy nội dung bµi míi: 37’

Hoạt động của GV và HS Nội dung

Hoạt đ ộng 1: 20’
GV: Đưa ví dụ 2
HS: Đọc hiểu ví dụ

GV: Hướng dẫn học sinh
cách sử dụng biến mảng
HS: Chú ý

GV: Cách khai báo biến có
ích lợi gì?

HS: Tiết kiệm thời gian và
cơng sức viết chương trình.

Ví dụ 2. Tiếp tục với ví dụ 1, thay vì khai báo các 
biến Diem_1, Diem_2, Diem_3,... để lưu điểm số
của các học sinh, ta khai báo biến mảng Diem như
sau:

var Diem: array[1..50] of real;

Cách khai báo và sử dụng biến mảng như trên có lợi
gì?

Trước hết, có thể thay rất nhiều câu lệnh nhập và in
dữ liệu ra màn hình bằng một câu lệnh lặp. Chẳng
hạn, ta có thể viết

For i:=1 to 50 do readln(Diem[i]);
để nhập điểm của các học sinh.

Để so sánh điểm của mỗi học sinh với một giá trị
nào đó, ta cũng chỉ cần một câu lệnh lặp, chẳng hạn

For i:=1 to 50 do

if Diem[i]>8.0 then writeln('Gioi');

Điều này giúp tiết kiệm rất nhiều thời gian và công
sức viết chương trình.

Hơn nữa, mỗi học sinh có thể có nhiều điểm theo
từng mơn học: điểm Tốn, điểm Văn, điểm Lí,... Để
xử lí đồng thời các loại điểm này, ta có thể khai báo
nhiều biến mảng:

var DiemToan: array[1..50] of real;

var DiemVan: array[1..50] of real;

var DiemLi: array[1..50] of real;
hay

var DiemToan, DiemVan, DiemLi: array[1..50] of

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

Hoạt đ ộng 2: 17’
GV: Đưa ví dụ 3
HS: Đọc hiểu ví dụ

GV: Hướng dẫn học sinh
cách sử dụng biến mảng
HS: Chú ý

- Ghi vở và thực hiện chương
trình.

Khi đó, ta cũng có thể xử lí điểm thi của một học
sinh cụ thể

Ví dụ 2 cũng cho thấy rằng, chúng ta gán giá trị, đọc
giá trị và tính tốn với các giá trị của một phần tử
trong biến mảng thơng qua chỉ số tương ứng của
phần tử đó. Chẳng hạn, trong câu lệnh trên Diem[i] 
là phần tử thứ i của biến mảng Diem.

Ta có thể gán giá trị cho các phần tử của mảng bằng
câu lệnh gán:

A[1]:=5;
A[2]:=8;

hoặc nhập dữ liệu từ bàn phím bằng câu lệnh lặp:

for i := 1 to 5 do readln(a[i]);

3. Tìm giá trị lớn nhất và nhỏ nhất của dãy số
Ví dụ 3. (SGK) Phần khai báo của chương trình có
thể như sau:

program MaxMin;

uses crt;

Var

i, n, Max, Min: integer;
A: array[1..100] of integer;

Phần thân chương trình sẽ tương tự dưới đây:

Begin

clrscr;

write('Hay nhap do dai cua day so, N = ');
readln(n);

writeln('Nhap cac phan tu cua day so:');
For i:=1 to n do

Begin

write('a[',i,']='); readln(a[i]);

End;

Max:=a[1]; Min:=a[1];
for i:=2 to n do

begin if Max<a[i] then Max:=a[i];
if Min>a[i] then Min:=a[i]
end;

write('So lon nhat la Max = ',Max);
write('; So nho nhat la Min = ',Min);
readln

End.
c) Củng cố, luyện tập: 3’

- Khái niệm mảng một chiều

- Cách khai báo mảng, nhập, in, truy cập các phần tử của mảng
d) Hướng dẫn HS tự học ở nhà: 2’

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

Ngày soạn: Ngày dạy:

Tiết 58

bµi tËp

1. Mục tiêu :

a) Kiến thức

- Viết chương trình Pascal sử dụng câu lệnh về biến mảng.

b) Kỹ Năng : - Rèn luyện khả năng đọc chương trình, tìm hiểu tác dụng và kết
hợp các câu lệnh.

c) Thái độ: Nghiêm túc

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: giáo án, máy chiếu
b) Học sinh: Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a) KiĨm tra bµi cị:

b) Dạy nội dung bµi míi: 40’

HOẠT ĐỘNG CỦA THẦY VÀ TRÒ NỘI DUNG

GV: Đưa ra các bài tập ở SGK và gọi học
sinh lên bảng trả lời.

1) (8p) Lợi ích chính của việc sử dụng biến
mảng là rút gọn việc viết chương trình, có
thể sử dụng câu lệnh lặp để thay nhiều câu
lệnh. Ngoài ra chúng ta cịn có thể lưu trữ
và xử lí nhiều dữ liệu có nội dung liên quan
đến nhau một cách hiệu quả.

2) (8p) Đáp án a) Sai. Phải thay dấu phẩy
bằng hai dấu chấm; b) và c) Sai, vì giá trị
nhỏ nhất và lớn nhất của chỉ số mảng phải

là số nguyên; d) Sai, vì giá trị đâu của chỉ
số mảng phải nhỏ hơn hoặc bằng chỉ số
cuối; e) Đúng.

3) (8p) Đúng

1) Hãy nêu các lợi ích của việc sử
dụng biến mảng trong chương trình.

2) Các khai báo biến mảng sau đây
trong Pascal đúng hay sai?

var X: Array[10,13] Of
Integer;

var X: Array[5..10.5] Of
Real;

var X: Array[3.4..4.8] Of
Integer;

var X: Array[10..1] Of
Integer;

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

4) (8p) Không. Giá trị nhỏ nhất và lớn nhất
của chỉ số mảng phải được xác định trong
phần khai báo chương trình.

5) (8p) Học sinh thực hành trên máy
Chương trình có thể như sau:

var N, i: integer;

A: array[1..100] of
real;

begin

write('Nhap so phan tu
cua mang, n= ',n);

for i:=1 to n do

write('Nhap gia tri

',i,'cua mang, a[',i,']=
');

end.

3) "Có thể xem biến mảng là một biến
được tạo từ nhiều biến có cùng kiểu,
nhưng chỉ dưới một tên duy nhất".
Phát biểu đó đúng hay sai?

4) Câu lệnh khai báo biến mảng sau
đây máy tính có thực hiện được
không?

var N: integer;

A: array[1..N] of real;
5) Viết chương trình Pascal sử dụng
biến mảng để nhập từ bàn phím các
phần tử của một dãy số. Độ dài của
dãy cũng được nhập từ bàn phím

c) Củng cố, luyện tập: 3’

- Hiểu các hoạt động lặp với số lần biết trước
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà xem lại bài học tiết sau chúng ta học tiếp.

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

Ngµy dạy :

8A :

8B :

Tit 59

Bài thực hành 7

:

xử lí dÃy số trong chơng trình

1 - MỤC TIÊU
a. Kiến thức

- Làm quen với việc khai báo và sử dụng các biến mảng
b. Kỹ Năng

- Ôn luyện cách sử dụng câu lệnh lặp for…do.

- Củng cố các kĩ năng đọc, hiểu và chỉnh sửa chương trình.
c. Thái độ: Nghiêm túc

2. CHUẨN BỊ

a. Giáo viên: giáo án, máy chiếu
b. Học sinh: Kiến thức cũ, sách, vở.
3 - TIẾN TRÌNH LÊN LỚP

a) KiĨm tra bµi cị: 3’

1. Hãy cho một số ví dụ về lặp với số lần chưa biết trước.
b) Dạy nội dung bµi míi: 37’

HOẠT ĐỘNG CỦA
THẦY VÀ TRÒ

NỘI DUNG
GV: Đưa ra bài tập 1 SGK

? Gọi học sinh nêu ý tưởng
- GV hướng dẫn

HS: Làm bài tập

Bài 1. Viết chương trình nhập điểm của các bạn 
trong lớp. Sau đó in ra màn hình số bạn đạt kết quả
học tập loại giỏi, khá, trung bình và kém (theo tiêu
chuẩn từ 8.0 trở lên đạt loại giỏi, từ 6.5 đến 7.9 đạt
loại khá, từ 5.0 đến 6.4 đạt trung bình và dưới 5.0
xếp loại kém).

a) Xem lại các ví dụ 2 và ví dụ 3, bài 9 về cách sử
dụng và khai báo biến mảng trong Pascal.

b) Liệt kê các biến dự định sẽ sử dụng trong chương
trình. Tìm hiểu phần khai báo dưới đây và tìm hiểu
tác dụng của từng biến:

program Phanloai;
uses crt;

Var

i, n, Gioi, Kha, Trungbinh,
Kem: integer;

A: array[1..100] of real;

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

Begin
clrscr;

write(‘Nhap so cac ban trong lop, n
= ‘); readln(n);

writeln(‘Nhap diem:’);

For i:=1 to n do Begin write(i,’. 
‘); readln(a[i]); End;

Gioi:=0; Kha:=0; Trungbinh:=0;
Kem:=0;

for i:=1 to n do
begin

if a[i]>=8.0 then 
Gioi:=Gioi+1;

if a[i]<5 then Kem:=Kem+1;

if (a[i]<8.0) and (a[i]>=6.5) 
then Kha:=Kha+1;

if (a[i]>=5) and (a[i]<6.5) 
then Trungbinh:=trungbinh+1
end;

writeln(‘Ket qua hoc tap:’);
writeln(Gioi,’ ban hoc gioi’);
writeln(Kha,’ ban hoc kha’);

writeln(Trungbinh,’ ban hoc trung
binh’);

writeln(Kem,’ ban hoc kem’);
readln

End.

d) Gõ tiếp phần chương trình này vào máy tính sau
phần khai báo. Dịch, chạy chương trình.

c) Củng cố, luyện tập: 3’
- Cách sử dụng biến mảng

- Cách kết hợp với lệnh lặp for…do
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà xem lại bài học tiết sau chúng ta thực hành tiếp.

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

Ngµy dạy :

8A :

8B :

Tit 60

Bài thực hành 7:

xử lí dÃy số trong chơng trình (T)

1. Mục tiêu :
a) Kiến thức

- Làm quen với việc khai báo và sử dụng các biến mảng
b) Kỹ Năng :

- Ôn luyện cách sử dụng câu lệnh lặp for…do.

- Củng cố các kĩ năng đọc, hiểu và chỉnh sửa chương trình.
c) Thái độ: Nghiêm túc

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: giáo án, máy chiếu
b) Học sinh: Kiến thức cũ, sách, vở.
3. Tiến trình bài dạy:

a) KiĨm tra bµi cị: 3’

1. Hãy cho một số ví dụ về lặp với số lần chưa biết trước.
b) Dạy nội dung bµi míi: 38’

HOẠT ĐỘNG CỦA
THẦY VÀ TRÒ

NỘI DUNG
GV: Đưa ra bài tập 2 SGK

? Gọi học sinh nêu ý tưởng
- GV hướng dẫn

HS: Làm bài tập

Bài 2. Bổ sung và chỉnh sửa chương trình trong bài 
1 để nhập hai loại điểm Toán và Ngữ văn của các
bạn, sau đó in ra màn hình điểm trung bình của mỗi
bạn trong lớp (theo cơng thức điểm trung bình =
(điểm Tốn + điểm Ngữ văn)/2), điểm trung bình
của cả lớp theo từng mơn Tốn và Ngữ văn.
a) Tìm hiểu ý nghĩa của các câu lệnh sau đây:
Phần khai báo:

Var

i, n: integer;

TbToan, TbVan: real;

DiemToan, DiemVan: array[1..100] of
real;

Phần thân chương trình:
begin

writeln('Diem trung binh:');
for i:=1 to n do

writeln(i,'. ',(DiemToan[i]
+DiemVan[i])/2:3:1);

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

begin TbToan:=TbToan+DiemToan[i];
TbVan:=TbVan+DiemVan[i] end;

TbToan:=TbToan/n; TbVan:=TbVan/n;
writeln('Diem trung binh mon Toan:
',TbToan:3:2);

writeln('Diem trung binh mon Van:
',TbVan:3:2);

end.

b) Bổ sung các câu lệnh trên vào vị trí thích hợp
trong chương trình. Thêm các lệnh cần thiết, dịch và
chạy chương trình với các số liệu thử.

c) Củng cố, luyện tập: 3’
- Cách sử dụng biến mảng

- Cách kết hợp với lệnh lặp for…do
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà xem lại bài hc tit sau chỳng ta thc hnh tip.

Ngày soạn:

Ngày dạy :

8A :

8B :

Tiết 61

QUAN SÁT HÌNH KHÔNG GIAN VỚI PHẦN MỀM YENKA. (t1)
1. Mục tiêu :

a) Kiến thức

- HS biêt khám phá, các hình khơng gian như: Thay đổi, di chuyển, thay đổi
kích thước, thay đổi màu cho các hình.

b) Kỹ Năng : - HS thực hiện được các kỹ năng thay đổi, di chuyển, thay đổi kích
thước, thay đổi màu cho các hình.

c) Thái độ: Nghiêm túc, cẩn thận.

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: tài liệu, giáo án.

b) Học sinh: Xem tríc näi dung bµi häc, dơng cơ häc tËp.

3. Tiến trình bài dạy: 
a) KiĨm tra bµi cị:

b) Dạy nội dung bµi míi: 40’

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

Hoạt động 1: (20p)

1. Giíi thiƯu phÇn
mỊm.

Yenka là một phần mềm nhỏ, đơn giản nhưng
rất có ý nghĩa. Phần mềm sẽ cho phép em làm
quen với các hình khối khơng gian đơn giản
như hình chóp, hình nón, hình trụ. Khơng
những có thể tạo ra các hình này, em cịn có thể
tương tác với chúng: thay đổi kích thước, màu
sắc và dịch chuyển và sắp xếp các hình này
trong khơng gian. Từ một vài đối tượng hình
khơng gian cơ bản em có thể sáng tạo ra các
khối hình hồn chỉnh, có ý nghĩa như những
cơng trình xây dựng, kiến trúc theo ý muốn của
mình.

Phần mềm cũng sẽ giúp em hiểu rõ hơn các bài
học về hình không gian trong chương trình
mơn Tốn bậc THCS.

Hoạt động 2: (20p)

2. Giới thiệu màn hình làm việc chính. 
a. khởi động phÇn mỊm:

GV: Giíi thiƯu: Sau khi cài đặt em sẽ nhìn thấy

biểu tượng của phần mềm có dạng như sau trên
màn hình.

Để khởi động:

Nháy đúp vào biểu tượng này để chạy phần
mềm. Em sẽ thấy xuất hiện cửa sổ thơng tin sau
đây:

HS: Chó ý l¾ng nghe va ghi bµi:

1. Giới thiệu :

- Yenka là một phần mềm nhánh
của cơng ty phần mềm Crocodile

nổi tiếng.

- Chức năng chính của phần mềm
là giúp học sinh thiết kế các mơ
hình hình khối kiến trúc khơng
gian dựa trên các hình khơng gian
c/ bản nhu hình trụ, lăng trụ, hình

chóp, hình hộp.

2. Giới thiệu màn hình làm việc 
chính.

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

b. Màn hình chính:

c. Thốt khỏi phần mềm:

Mn thoát khỏi phần mỊm, nh¸y nót close
trên thanh công cụ.

b. Maứn hỡnh chớnh:

c.Thoỏt khi phn mm:

Muốn thoát khỏi phần mềm, nháy nút
close trên thanh công cụ.

c) Củng cố, luyện tập: 3’

Gv Hệ thống lại kiến thực trọng tâm trong bài.
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà đọc tiếp bài “Quan sát hình không gian bằng phần mềm YenK”.
- Về nhà xem lại ni dung va hc, xem tip bi hc.

Ngày soạn:

Ngày dạy :

8A :

8B :

Tiết 62

QUAN SÁT HÌNH KHÔNG GIAN VỚI PHẦN MỀM YENKA (t2)
1. Mục tiêu :

a) Kiến thức

*) Tiếp tục hớng dẫn để:

- HS biêt khám phá, các hình khơng gian như: Thay đổi, di chuyển, thay đổi
kích thước, thay đổi màu cho các hình.

b) Kỹ Năng : - HS thực hiện được các kỹ năng thay đổi, di chuyển, thay đổi kích
thước, thay đổi màu cho các hình.

c) Thái độ: Nghiêm túc, cẩn thận.

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: tài liệu, giáo án.

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

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị: 3’

- Em hãy giới thiệu lại về phần mềm YenK? Mở và đóng phần mềm trên
máy tính?

b) Dạy nội dung bµi míi: 37’

Hoát ủoọng GV – HS Noọi dung

Hoạt động 1: (18p)

3. Tạo các hình không gian.

Hoạt động 2: (17p)

*) Xoay mô hình trong khoâng gian 3D.
- Nháy vào biểu tượng trên thanh
cơng cụ chức năng. Khi đó con trỏ sẽ trở
thành dạng .

- Đưa con trỏ chuột lên khung màn hình,

3. Tạo các hình không gian.
a. Tạo mô hình.

Vào hộp hội thoại sau:

Chọn hình và kéo thả các đối tượng vào khu
vực tạo các đối tượng.

 Xoay mơ hình trong khơng gian 3D.
- Nháy vào biểu tượng xoay

- Đưa con trỏ chuột lên mô hình
Hình trụ

hình

chóp
Hình
lăng trụ
Hình

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

nhấn giữ và kéo rê chuột trên màn hình
em sẽ thấy khung mơ hình quay trong
khơng gian 3D. Lệnh hết tác dụng khi
em thả tay chuột.

 Phoùng to, thu nhỏ:

 di chuyển khung mô hình:

b/ các lệnh tạo mới, lưu, mở tệp mơ hình:

c/ Xóa các đối tượng:

- Nhấp chuột vào mơ hình cần xóa
- Ctrl + A hoặc Delete.

c) Củng cố, luyện tập: 3’

Gv Hệ thống lại kiến thực trọng tâm trong bài.
d) Hướng dẫn HS tự học ở nhà: 2’

- Về nhà đọc tiếp bài “Quan sát hình khơng gian bằng phần mềm YenK”.
- Về nhà xem lại nội dung vừa hc, xem tip bi hc.

Ngày soạn:

Ngày dạy :

8A :

8B :

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

víi phÇn mỊm yenka (T3)

1. Mục tiêu :

a) Kiến thức

- HS biết khám phá, điều khiển các hình không gian như: thay đổi, di
chuyển, thay đổi kích thước, thay đổi màu cho các hình.

b) Kỹ Năng :

- HS thực hiện được các kỉ năng thay đổi, di chuyển, thay đổi kích thước,
thay đổi màu cho các hình cụ thể.

c) Thái độ:

- HS nghiªm tóc trong häc tập và nghiên cứu bài học.

2. Chun b ca giỏo viên và học sinh :
a) Giáo viên: tài liệu, giáo án.

b) Học sinh: Xem tríc näi dung bµi häc, dơng cơ häc tËp.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cũ: 8

GV: Cho hinh vẽ lên bảng phụ

HS: Vẽ theo yêu cầu

b) Dy ni dung bài mới: 15

TG Hot động của thầy và trị Nội dung

15 GV: Giíi thiệu
HS: nghe và ghi.

4. Khám phá, điều khiển các hình

c) Thay đổi màu cho các hình.
*) Các bớc thay đổi màu
Để tô màu ta dùng công cụ

Khi nhày nút cơng cụ này ta có một
danh sách màu đổ xuống:

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

TG Hoạt động của thầy và trị Nội dung

Các tính của hình có thể thay đổi
thơng qua hộp thoại tính chất đối tợng
ta làm nh sau:

d) Thay đổi tính chất của hình

Nháy đúp lên đối tợng, hộp thoại mô
tả các thông tin xuất hiện

Chúng ta có thể thay đổi tham số

quan trọng của hình là chiều cao
(height) và độ dại cạnh đáy (base
edge) bằng cách gõ trực tiếp vào ô
hoặc nháy chuột vào để tăng hay
giảm từng đơn vị.

c) Củng cố, luyện tập: 20’

GV: Cho học sinh thực hành vẽ hình, sáng tạo theo ý thích.

d) Hng dn HS t hc nh: 2

Đọc các mục còn lại.

ễn li cỏc kin thc ca k II để chuẩn bị kiểm tra 1 tiết phần thực hnh.

Ngày soạn:

Ngày dạy :

8A :

8B :

Tiết 64

:

quan sát hình không gian

với phần mềm yenka (T4)

1. Mục tiêu :
a) Kiến thức

- HS biết khám phá, điều khiển các hình không gian như: thay đổi, di
chuyển, thay đổi kích thước, thay đổi màu cho các hình.

b) Kỹ Năng :

- HS thực hiện được các kỉ năng thay đổi, di chuyển, thay đổi kích thước,
thay đổi màu cho các hình cụ thể.

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

- HS nghiªm tóc trong häc tËp và nghiên cứu bài học.

2. Chun b ca giỏo viờn và học sinh :
a) Giáo viên: tài liệu, giáo án.

b) Học sinh: Xem tríc näi dung bµi häc, dơng cơ häc tËp.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị: 8

GV: Cho hinh vẽ lên bảng phụ
HS: Vẽ theo yêu cầu

? Nờu cỏc bc thay i mu v, thụng số của hình vẽ.

b) Dạy nội dung bµi míi: 15’

TG Hoạt động của thầy và

trß Néi dung

15 GV: Mét chức năng rất hay của phần
mềm là cho phép ta qua sát cách tạo
không gian từ một hình phẳng. Phần
mềm sẽ cho phép quan sát và thực
hiện hai quá trình ngợc lại:

- Cho hỡnh phng cn gấp lại để thành
hình khơng gian.

- Hình khơng gian cần m tr
thnh hỡnh phng.

4. Khám phá, điều khiển các hình 
(tiếp)

e) Gp giy thnh hỡnh khụng gian
*) Gp hình phẳng để tạo thành hình
khơng gian

Sư dơng các công cụ
,

B

ớc 1: Chọn
hoặc

trong hộp thoại kéo thả đối tợng vào
giữa màn hình.

B

ớc 2. Kéo thả chuột để thực hiện
thao tác gấp hình phẳng thành hình
khơng gian tng ng.

*) Mở hình không gian thành hình 
phẳng SGK – 119 – 120)

c) Củng cố, luyện tập: 20’

GV: Cho học sinh thực hành vẽ hình, sáng tạo theo ý thích.
HS: Thực hành thao tác gấp và mở hình.

d) Hng dn HS t hc nh: 2

Đọc các mục còn l¹i.

Ơn lại các kiến thức của kỳ II để chun b kim tra 1 tit phn thc hnh.

Ngày soạn:

Ngày d¹y :

8A :

8B :

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

víi phÇn mỊm yenka (T5)

1. Mục tiêu :

a) Kiến thức

- HS biết khám phá, điều khiển các hình khơng gian như: thay đổi, di
chuyển, thay đổi kích thước, thay đổi màu cho các hình.

b) Kỹ Năng :

- HS thực hiện được các kỉ năng thay đổi, di chuyển, thay đổi kích thước,

thay đổi màu cho các hình cụ thể.

c) Thái độ:

- HS nghiêm túc trong học tập và nghiên cứu bài học.

2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: tài liệu, giáo án.

b) Học sinh: Xem tríc näi dung bµi häc, dơng cơ häc tËp.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị: 8

GV: Cho hinh vÏ lên bảng phụ
HS: Vẽ theo yêu cầu

Nêu các bớc gấp hình phẳng thành hình không gian?
Thực hành gấp trên máy.

b) Dạy nội dung bµi míi: 15’

TG Hoạt động của thầy và

trß Néi dung

15 GV: Giới thiệu: Đối với các mặt của
hình khơng gian, ta cũng có thể thay
đổi màu, ta còn thay đổi đợc kiểu
và mẫu thể hiện ta lam các bớc sau:

HS: nghe và ghi và GV thực hành
mẫu học sinh quan sát và thực hành
theo.

5. Một số chức năng nâng cao
a) thay đổi mẫu thể hiện hình.
Bớc 1: Nháy đúp chuột để mở hộp
thoại tính chất của hình

Bớc 2. Chọn lệnh thay đổi kiểu bề mặt

surface appearance >

Bíc 3. Trong hép tho¹i tiÕp theo, chän
Use material và chọn mẫu trong danh
sách Material phía dới.

b) Quay hình trong không gian

Trong hộp thoại tính chất hình, em có
thể quay hình theo các cách khác nhau
trong không gian:

- Khung Râttion có các lệnh cho phép
cho phép quay hình theocác cách khác
nhau:

+ Quay theo trôc ngang.
+ Quay theo trôc däc

+ Quay theo trục thẳng đứng.
+ Trở lại vị trí ban đầu..

c) Củng cố, luyn tp: 20

GV: Cho học sinh thực hành vẽ hình, sáng tạo theo ý thích.
HS: Thực hành Vẽ hình và quay hình, tô màu hình.

d) Hng dn HS t hc nh: 2

Đọc các mục còn lại.

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

Ngày soạn:

Ngày dạy :

8A :

8B :

Tiết 66

:

quan sát hình không gian

với phần mềm yenka (T6)

1. Mc tiêu :
a) Kiến thức

- HS biết khám phá, điều khiển các hình khơng gian như: thay đổi, di
chuyển, thay đổi kích thước, thay đổi màu cho các hình.

b) Kỹ Năng :

- HS thực hiện được các kỉ năng thay đổi, di chuyển, thay đổi kích thước,
thay đổi màu cho các hình cụ thể.

c) Thái độ:

- HS nghiªm tóc trong häc tËp và nghiên cứu bài học.

2. Chun b ca giỏo viờn và học sinh :
a) Giáo viên: tài liệu, giáo án.

b) Học sinh: Xem tríc näi dung bµi häc, dơng cơ häc tËp.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị: 8

GV: Cho hinh vẽ lên bảng phụ
HS: Vẽ theo yêu cầu

? Nờu cỏc bc thay i mu th hin hình.
? Quay hình trong khơng gian.

b) Dạy nội dung bµi mới: 43

GV: Cho học sinh thực hành tổng hợp các mục:
- Cách tạo mô hình

- Xoay mô hình trong không gian 3D
- Phãng to, thu nhá.

- Di chuyển khung mô hình.
- Xố các đối tợng.

HS: Thùc hµnh

c) Củng cố, luyện tập: (Kết hợp trong giờ thực hành)
d) Hướng dẫn HS t hc nh: 2

Đọc các mục còn lại.

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

Ngày soạn:

Ngày dạy :

8A :

8B :

Tiết 67: kiĨm tra thùc hµnh 1 tiÕt

1. Mục tiêu :

a) Kiến thức :Häc sinh thùc hiƯn kiĨm tra thực hành trên máy tính.

b) K Nng : Kiếm thức chđ u thc 3 bµi häc ci cïng.

c) Thỏi độ: ý thức làm bài và bảo vệ máy tính để s dng lõu di.

*/ Chuẩn bị:

GV- Sách giáo khoa, giáo án, tài liệu tin học có liên quan.
HS - §äc tµi liƯu ë nhµ tríc khi

2. Đề kiểm tra:

Câu 1: Lập trình tính tổng:
A= 1+2+3+..+n

ở đây n là số tự nhiên đợc nhập từ bàn phím. (viết b»ng lƯnh while .. do)

(viÕt b»ng lƯnh for ... do)

( u ýL : Mỗi câu đợc ghi lại thành 1 File ở Mydocments có tên là LOP8A.PAS Và
LOP8B.PAS).

3. đáp án + thang điểm và hớng dẫn chấm.

Lm ỳng cho 5 im :

Câu Nội dung Điểm

1

Program B1 ;
Uses CRT;
Var

i, n: integer;
tong: real;

1,5

Begin
Clrscr;

write('cho so tu nhien n: '); Readln(n);
tong:=0; i:=1;

1,5

while i<= n do
Begin

tong:= tong+ i;
i: = i+1;

End;

writeln(' Tong can tim la: ', tong:12:6);
Readln;

End. 1

2

Làm đúng cho 5 điểm

1,5

Program B2;
Var i: byte;
s: real;
Begin

s:=0; 1,5

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

Writeln(' 1+ 1/2 + 1/3 + .. . + 1/20 = ', s: 14:10);

Readln; End. 1

4.Nhận xét, đánh giá sau khi chấm bài kiểm tra:

Ngµy soạn:

Ngày dạy :

8A :

8B :

Tiết 68: «n tËp

1. Mục tiêu :
a) Kiến thức

 Củng cố lại toàn bộ kiến thức đã đợc học từ bài 5 đến bài 9 và phần mềm
học tập ở học kỳ 2.

 Thực hiện làm các bài trắc nghiệm. Vận dụng vào để viết đợc những chơng
trình n gin

b) K Nng : Có kỹ năng thành thạo thực hiện máy tính và viết chơng trình trên
máy tÝnh.

c) Thái độ: Nghiêm túc, cẩn thận.
2. Chuẩn bị của giáo viên và học sinh :
a) Giáo viên: tài liệu, giáo án.

b) Học sinh: Xem tríc näi dung bµi häc, dơng cơ häc tËp.

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị: 1’

- KiĨm tra sù chn bÞ cđa häc sinh .

b) Dạy nội dung bµi míi: 40’

Hoạt động của giáo viên Hoạt động của học sinh
Giáo viên cho học sinh ôn lại lý thuyt

Theo sách giáo khoa.
(Học sinh về nhà tự ôn)

Học sinh thùc hiÖn theo yêu cầu của
giáo viên

Ôn bài tập vận dụng:

Khoanh trũn ch cỏi ng trc kết quả đúng
Câu 1: Phát biểu nào sau đây là đúng ?

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

B. Chỉ ngơn ngữ lập trình Pascal mới có các câu lệnh lặp để thể hiện cấu
trúc lặp.

C. Ngôn ngữ Pascal thể hiện cấu trúc lặp với số lần lặp cho trước bằng câu
lệnh while…do

D. Ngôn ngữ Pascal thể hiện cấu trúc lặp với số lần lặp chưa biết trước bằng

câu lệnh For…do

Câu 2: Lệnh lặp nào sau đây là đúng?

A. For <biến đếm>= <giá trị đầu> to <giá trị cí> do <câu lệnh>;
B. For <biến đếm>:= <giá trị đầu> to <giá trị cí> do <câu lệnh>;
C. For <biến đếm>:= <giá trị cí> to <giá trị đầu> do <câu lệnh>;
D. For <biến đếm>: <giá trị đầu> to <câu lệnh> do <giá trị cuối>;
Câu 3: Câu lệnh pascal nào sau đây là hợp lệ?

A) For i:=100 to 1 do writeln(‘A’); B) For i:=1.5 to 10.5 do
writeln(‘A’);

C) For i= 1 to 10 do writeln(‘A’); D) For i:= 1 to 10 do writeln(‘A’);
Câu 4: Vòng lặp while ..do là vòng lặp:

A) Biết trước số lần lặp B) Chưa biết trước số lần lặp

C.) Biết trước số lần lặp nhưng giới hạn là <=100 D) Biết trước số lần lặp nhưng
giới hạn là >=100

Câu 5: Câu lệnh lặp while…do có dạng đúng là:

A) While <điều kiện> do; <câu lệnh>; B) While <điều kiện> <câu lệnh>
do;

C) While <câu lệnh> do <điều kiện>; D) While <điều kiện> do <câu
lệnh>;

Câu 6: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :

s:=0;

for i:=1 to 5 do s := s+i;
writeln(s);

Kết quả in lên màn hình là của s là :

A.11 B. 55 C. 101 D.15

Câu 7: Trong chương trình pascal sau ñaây:
Var x : integer ;

Begin

X:= 3 ;

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

End.

X có giá trị là mấy

a) 3 b) 5 c) 15 d)10

Câu 8: Trong chương trình pascal sau ñaây:
program hcn;

var a, b :integer;
s,cv :real ;
begin

a:= 10;

b:= 5;
s:= a*b ;

cv:= (a +b ) * 2 ;

writeln(‘dien tich hcn la:’ , s );
writeln( ‘chu vi hcn la : ‘ , cv ) ;
readln;

end.

Bieán s và cv có giá trị là mấy:

a/ s = 10 ; cv = 5 ; b/ s= 30 ; cv = 50 ;

c/ s = 50 ; cv = 40 ; d/ s = 50 ; cv = 30 ;
c) Cng c, luyn tp: 3

- Giáo viên hệ thống lại toàn bộ nội dung bài học.
- Yêu cầu học sinh nhắc lại bài

d) Hng dn HS t hc ở nhà: 1’

- Học bài theo sách giáo khoa và vở ghi, Ơn lại các kiến thức chính đã học và
luyện viết, làm đi làm lại nhiều lần.

- Häc kĩ lí thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên đầu
tiên.

- Làm các bài tập còn lại,

Ngày soạn:

Ngày dạy :

8A :

8B :

TiÕt 69: «n tËp

1. Mục tiêu :
a) Kiến thức

 Củng cố lại toàn bộ kiến thức đã đợc học từ bài 5 đến bài 9 và phần mềm
học tập ở học kỳ 2.

 Thực hiện làm các bài trắc nghiệm. Vận dụng vào để viết đợc những chng
trỡnh n gin

b) K Nng : Có kỹ năng thành thạo thực hiện máy tính và viết chơng trình trên
máy tính.

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

2. Chun b ca giỏo viên và học sinh :
a) Giáo viên:

- S¸ch gi¸o khoa, giáo án, tài liệu tin học có liên quan.

b) Hc sinh: - Đọc tài liệu ở nhà trớc khi

3. Tiến trình bài dạy:
a) KiĨm tra bµi cị: 1’

- KiĨm tra sù chn bÞ cđa häc sinh .

b) Dạy nội dung bµi míi: 40’

Hoạt động của giáo viên Hoạt động của học sinh
Ôn bài tập củng cố kiến thức:

Câu 9: Sau khi thực hiện đoạn chương trình j:= 0; for i:= 1 to 3 do j:=j+2; thì giá
trị in ra màn hình là?

a) 4 b) 6 c) 8 d)10

Câu 10: Để tính tổng S=1+3 + 5 + … + n; em chọn đoạn lệnh:
a) for i:=1 to n do

if ( i mod 2)=0 then S:=S + 1/i;

c) for i:=1 to n do

if ( i mod 2) < > 0 then S:=S +
i;

b) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i
Else S:= S + I;

d) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i;
Câu 11: Để tính tổng S=1/2+1/4 + 1/6 + … +1/ n; em chọn đoạn lệnh:

a) for i:=1 to n do

if ( i mod 2)=0 then S:=S + 1/i;

c) for i:=1 to n do

if ( i mod 2) < > 0 then S:=S +
i;

b) for i:=1 to n do

if ( i mod 2)=0 then S:=S – 1/i
Else S:= S + 1/i;

d) for i:=1 to n do

if ( i mod 2)=0 then S:=S +1/ i
Else S:=S-1/i;

Câu 12: Để tính tổng S=1+1/3 + 1/5 + … +1/ n; em chọn đoạn lệnh:
a) for i:=1 to n do

if ( i mod 2)=1 then S:=S + 1/i; c) for i:=1 to n doif ( i mod 2) =0 then S:=S +
1/i;

b) for i:=1 to n do

if ( i mod 2)=0 then S:=S + 1/i
Else S:= S + 1/;

d) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i;
Câu 13: Để đếm có bao nhiêu số lẻ nhỏ hơn hay bằng n ; em chọn đoạn lệnh:
a) for i:=1 to n do

if ( i mod 2)< >0 then S:=S + 1; c) for i:=1 to n doif ( i mod 2) =0 then S:=S + 1;
b) for i:=1 to n do

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

a) s:=0; i:=0;
While i<=n do

S:=S + 1;

a) s:=0; i:=0;
While i<=n do

If (I mod 2)= 1 Then S:=S + i;
b) s:=0; i:=0;

While i<=n do
begin

S:=S + i;
I:=i+1;
End;

d) s:=0; i:=0;
While i<=n do

begin

if (i mod2)=1 Then S:=S + i;
Else i:=i+1;

End;
Caâu 15: Caâu lệnh nào sau đây lặp vô hạn lần
a) s:=5; i:=0;

While i<=s do
s:=s + 1;

a) s:=5; i:=1;
While i<=s do

i:=i + 1;
b) s:=5; i:=1;

While i> s do
i:=i + 1;

d) s:=0; i:=0;
While i<=n do
begin

if (i mod2)=1 Then S:=S + i;
Else i:=i+1;

End;
Câu 16: Chọn khai báo hơp lệ

a) Var a,b: array[1..n] of real; c) Var a,b: array[1:n] of real;
b) Var a,b: array[1..100] of real; d) Var a,b: array[1…n] of real;
Caâu 27: Chọn khai báo hơp lệ

a) Const n=5;

Var a,b: array[1..n] of real;

c) Var n: real;

Var a,b: array[1:n] of real;
b) Var a,b: array[100..1] of real; d) Var a,b: array[1..5..10] of real;
Caâu 17: Chọn khai báo hơp lệ

a) Const n=5;

Var a,b: array[1..n] of integer;

c) Var n: real;

Var a,b: array[1:n] of real;

b) Var a,b: array[100..1] of integer; d) Var a,b: array[1..5..10] of integer;
Câu 18: Lần lượt thực hiện đoạn lệnh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1; 
Giá trị của t là

a) t=1 b) t=3 c) t=2 d) t=6
c) Củng cố, luyện tập: 3’

- Gi¸o viên hệ thống lại toàn bộ nội dung bài học.
- Yêu cầu học sinh nhắc lại bài

d) Hng dn HS tự học ở nhà: 1’

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

- Häc kÜ lí thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên đầu
tiên.

- Lm cỏc bi tp cịn lại và ơn lại tồn bộ kiến thức để gi sau kim tra hc
k 2

---o0o---Ngày soạn:

Ngày dạy :

8A :

8B :

TiÕt 70: kiÓm tra häc kú 2

1. Mục tiêu

a) Kiến thức
b) Kỹ Năng :
c) Thái độ:
*/ Chuẩn bị:

GV - Sách giáo khoa, giáo án, tài liệu tin học có liên quan.
HS - Đọc tài liệu ë nhµ tríc khi

2. Đề ể ki m tra:

Hä tên: ………
Lớp: 8…

ĐỀ KIỂM TRA HỌC KỲ 2 NĂM HỌC 2008 – 2009

Môn: Tin học 8 (Thời gian 45 phút)
A/ LÝ THUYẾT:

I/ Trắc nghiệm khách quan:

Khoanh trịn chữ cái đứng trước kết quả đúng .
Câu 1: Lệnh lặp nào sau đây là đúng?

E. For <biến đếm>= <giá trị đầu> to <giá trị cí> do <câu lệnh>;
F. For <biến đếm>:= <giá trị đầu> to <giá trị cí> do <câu lệnh>;
G. For <biến đếm>:= <giá trị cí> to <giá trị đầu> do <câu lệnh>;
For <biến đếm>: <giá trị đầu> to <câu lệnh> do <giá trị cuối>;

Câu 2: Vòng lặp while ..do là vòng lặp:

A) Chưa biết trước số lần lặp B) Biết trước số lần lặp

C.) Biết trước số lần lặp nhưng giới hạn là <=100 D) Biết trước số lần lặp nhưng giới
hạn là >=100

Câu 3: Câu lệnh lặp while…do có dạng đúng là:

A) While <điều kiện> do; <câu lệnh>; B) While <điều kiện> <câu
lệnh> do;

C) While <câu lệnh> do <điều kiện>; D) While <điều kiện> do <câu
lệnh>;

Câu 4: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :
s:=0;

for i:=1 to 5 do s := s+2;
writeln(s);

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

A.11 B. 55 C. 12 D.13
Câu 5: Lần lượt thực hiện đoạn lệnh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1; 
Giá trị của t là

A) t=1 B) t=2 C) t=3 D) t=6
Câu 6: Câu lệnh pascal nào sau đây là hợp lệ?

B) For i:= 1 to 10 do writeln(‘A’); B) For i:=1.5 to 10.5 do
writeln(‘A’);

C) For i= 1 to 10 do writeln(‘A’); D) For i:=100 to 1 do
writeln(‘A’);

II/ Tự luận:

Viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím các phần
tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím.

BÀI LÀM:

Hä tên: ………

Lớp: 8 …

ĐỀ KIỂM TRA HỌC KỲ 2 NĂM HỌC 2008 – 2009
Môn: Tin học 8 (Thời gian 45 phút)

B/ THỰC HÀNH:

Viết chương trình nhập điểm của các bạn trong lớp. Sau đó in ra màn hình số
bạn đạt kết quả học tập loại giỏi, khá, trung bình và kém (theo tiêu chuẩn từ 8.0 trở
lên đạt loại giỏi, từ 6.5 đến 7.9 đạt loại khá, từ 5.0 đến 6.4 đạt trung bình và dưới 5.0
xếp loại kém).

a) Liệt kê các biến dự định sẽ sử dụng trong chương trình. Tìm hiểu phần khai báo
dưới đây và tìm hiểu tác dụng của từng biến:

program Phanloai;
uses crt;

Var

i, n, Gioi, Kha, Trungbinh, Kem: integer;
A: array[1..100] of real;

b) Gõ phần khai báo trên vào máy tính và lưu tệp với tên Phanloai. Tìm hiểu các
câu lệnh trong phần thân chương trình dưới đây:

Begin
clrscr;

write(‘Nhap so cac ban trong lop, n = ‘); readln(n);

writeln(‘Nhap diem:’);

For i:=1 to n do Begin write(i,’. ‘); readln(a[i]); End;
Gioi:=0; Kha:=0; Trungbinh:=0; Kem:=0;

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

if a[i]>=8.0 then Gioi:=Gioi+1;
if a[i]<5 then Kem:=Kem+1;

if (a[i]<8.0) and (a[i]>=6.5) then Kha:=Kha+1;
if (a[i]>=5) and (a[i]<6.5) then

Trungbinh:=trungbinh+1
end;

writeln(‘Ket qua hoc tap:’);
writeln(Gioi,’ ban hoc gioi’);
writeln(Kha,’ ban hoc kha’);

writeln(Trungbinh,’ ban hoc trung binh’);
writeln(Kem,’ ban hoc kem’);

readln
End.

c) Gõ tiếp phần chương trình này vào máy tính sau phần khai báo. Dịch, chạy
chương trình.

-3. Đáp án - biểu điểm :

A/ LÝ THUYẾT (10 ĐIỂM)
I/ Trắc nghiệm khách quan: (3 điểm)

Mỗi câu đúng cho 0,5 điểm

Câu 1 2 3 4 5 6

Đáp án B A D C D A

II/ Tự luận: (7 điểm)

Program nhap_so_phan_tu_cu_mang;
Uses Crt;

var N, i: integer;

A: array[1..100] of real;

2.0
Begin

Clrscr;

write('Nhap so phan tu cua mang, n= ',n); 2.0

for i:=1 to n do

write('Nhap gia tri ',i,'cua mang, a[',i,']= '); 2.0
 Readln;

end. 1.0

B/ THỰC HÀNH
Làm dúng cho 10 điểm

CÁCH TÍNH ĐIỂM CỦA BÀI
- Làm trịn đến phần mười

- Tính theo cơng thức sau: ĐTB của bà = (Điểm LT x 2 + Điểm TH) : 3

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

ngày soạn ngày soạn 02012010 ngày dạy 8a 05012010 8b 05012010 tiết 37 bài 7 câu lệnh lặp 1 mục tiêu a kiến thức biết nhu cầu cần có cấu trúc lặp trong ngôn ngữ lập trình biết ngôn ngữ lập trình

<i>Tiết 37:</i>

<b> Bài 7: CÂU LỆNH LẶP</b>

<b> Bài 7: CÂU LỆNH LẶP (T2)</b>

<i>Tiết 39:</i>

<b>BÀI TẬP </b>

<i>Tiết 40:</i>

<b>BÀI TẬP (Tiếp)</b>

<i><b>Bµi thùc hµnh 5:</b></i>

<b> </b>

<b>Sư dơng lệnh lặp for ...do (t1)</b>

<i><b>Bµi thùc hµnh 5:</b></i>

<b> </b>

<b>Sư dơng lƯnh lặp for ...do (t1)</b>

<b>TiÕt 47</b>

<b> : häc vÏ h×nh víi phần mềm geogebra</b>

<b>häc vẽ hình với phần mềm geogebra (TT)</b>

<b>Tiết 52</b>

<b>Bài tập (T2)</b>

<i><b>TiÕt 53:</b></i>

<i><b>Bµi thùc hµnh 6:</b></i>

<b> Sư dơng lƯnh While do</b>

…

<i><b>TiÕt 54:</b></i>

<b>Bµi thùc hµnh 6: </b>

<b>Sư dơng lƯnh While do</b>

…

<b>Tiết 55</b>

<b>KIỂM TRA 1 TIẾT</b>

<b>Tiết 56</b>

<b>Lµm viƯc víi d·y sè</b>

<b>Tiết 57</b>

<b>Bài 9</b>

<b> : lµm viƯc víi d·y sè (</b>

<b>Tiếp</b>

<b>)</b>

<b>Tiết 58</b>

<b>bµi tËp</b>

<b>Ngµy dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>Tit 59</b>

<i><b>Bài thực hành 7</b></i>

<i><b>: </b></i>

<b>xử lí dÃy số trong chơng trình</b>

<b>Ngµy dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>Tit 60</b>

<i><b>Bài thực hành 7:</b></i>

<b>xử lí dÃy số trong chơng trình (T)</b>

<b>Ngày dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>Tiết 61</b>

HS: Chó ý l¾ng nghe va ghi bµi:

<b>1. Giới thiệu :</b>

<b>Ngày dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>Tiết 62</b>

<b>Ngày dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>víi phÇn mỊm yenka (T3)</b>

<b>Ngày dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>:</b>

<b>quan sát hình không gian </b>

<b>với phần mềm yenka (T4)</b>

<b>Ngày d¹y : </b>

<b>8A :</b>

<b>8B :</b>

<b>víi phÇn mỊm yenka (T5)</b>

<b>Ngày dạy : </b>

<b>8A :</b>

<b>8B :</b>

<b>:</b>

<b>quan sát hình không gian </b>