Vì vậy ta cần sử dụng thêm một vòng lặp nữa để các cột được xuất ra màn hình như bảng trên - Chỉ số hàng sẽ nằm trong khoảng nào?. - Chỉ số cột sẽ viết như thế nào??[r]
Trang 1Tuần: 21 Ngày soạn
19/01/2013
23/01/2013
Bài thực hành số 5
Sử dụng lệnh lặp For … do (T1)
I MỤC TIÊU
1 Kiến thức
- 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
2 Kĩ năng
- Rèn kỹ năng đọc hiểu chương trình có sử dụng vòng lặp for … do
3 Thái độ
- Nghiêm túc trong học tập, ý thức tự tìm tòi và nghiên cứu bài, ham thích môn học
II CHUẨN BỊ
.Giáo viên
- Giáo án, sách giáo khoa, phấn, bảng, máy tính, máy chiếu
2 Học sinh
- Sách giáo khoa, vở ghi, bút thước…
III NỘI DUNG VÀ TIẾN TRÌNH BÀI DẠY
1 Ổn định tổ chức lớp
Sĩ số của các lớp:
Sĩ số của các lớp:
Lớp 8A1: ……… ; 8A2: ……….; 8A3: ……… …
8A4: ……… ; 8A5: ……….; 8A6: ……… …
2 Kiểm tra bài cũ
Cho đoạn chương trình :
for i:= 1 to 3 do Begin
Write(‘Nhap ten cua ban : ‘); Readln(Ten);
Writeln(‘Chao ban : ‘,Ten);
End;
Sau khi thực hiện chương trình trên, ta sẽ thấy kết quả nào ?
3 Bài mới
Hoạt động của thầy Hoạt động của trò Kiến thức ghi bảng
- GV giới thiệu bài tập (trên
máy chiếu) Cho học sinh thực
hành gõ chương trình bài 1
(SGK/62)
- GV quan sát tiến trình thực
hành của học sinh
- Các em hãy tìm hiểu ý nghĩa
của các câu lênh trong chương
- HS thực hành theo nhóm (2HS)
- HS tìm hiểu và đại diện một
số nhóm trả lời
- HS chú ý
Bài 1 : Viết chương trình in ra
màn hình bảng nhân của các số
từ 1 đến 9, số được nhập từ bàn phím và dừng màn hình để
có thể quan sát kết quả:
a Gõ chương trình sau :
uses crt;
var N,i:integer;
Trang 2- GV nhấn mạnh câu lệnh for …
do
- GV chú ý cho HS : Trong
vòng lặp for … do có nhiều
câu lệnh thì phải đặt trong
Begin … end;
- Cho HS dịch chương trình và
sửa lỗi
- Cho HS tiếp tục làm câu c, và
quan sát kết quả nhận được trên
màn hinh, nhận xét
- Hãy cho biết số lần lặp của
vòng lặp for … do ứng với mỗi
giá trị 1, 2, 3,…, 10 ?
- Chú ý : Nếu chương trình lặp
lại nhiều lần, ta muốn ngắt
chương trình thì sử dụng tổ hợp
phím
Ctrl + Break.
- Trong hình 36, khác kết quả
nhận được ở chổ nào?
- GV giới thiệu cho HS các
lệnh GotoXY, WhereX và
WhereY (Máy chiếu)
- Cho học sinh thực hiện bổ
sung các câu lênh
- HS thực hiện theo yêu câu
- HS trả lời Quan sát
- Chú ý lắng nghe
- HS trả lời
- HS chú ý phần lưu ý trong sách giáo khoa, quan sát và theo dõi
- HS thực hành theo yêu cầu
begin
clrscr;
write('Nhap so N=');
readln(N);
writeln;
writeln('Bang nhan ',N); writeln;
for i:=1 to 10 do writeln(N,'
x ',i:2,' = ',N*i:3);
readln
end.
b Tìm hiểu ý nghĩa của các câu lệnh trong chương trình, dịch chương trình và sửa lỗi, nếu có
c Chạy chương trình với các giá trị nhập vào lần lượt bằng
1, 2, , 10 Quan sát kết quả nhận được trên màn hình
Bài 2 : Chỉnh sửa chương trình
trên màn hình để làm đẹp thêm màn hình
* Lưu ý:
- Chỉ sử dụng được các lệnh
GotoXY, WhereX và WhereY
sau khi khai báo thư viện crt
của Pascal
- Câu lệnh GotoXY(a, b) có tác
dụng đưa con trỏ về cột a,
hàng b
- WhereX cho biết số thứ tự
của cột và WhereY cho biết số
thứ tự của hàng đang có con
trỏ Ví dụ GotoXY(5,WhereY)
đưa con trỏ về vị trí cột 5 của hàng hiện tại
4 Củng cố
- Số lần lặp của chương trình for do có biết trước được không?
- Câu lệnh GotoXY(a,b) có tác dụng như thế nào ?
- Chú ý có thể kết hợp câu lệnh GotoXY(a,b)với các hàm chuẩn WhereX và
WhereY để điều khiển vị trí của con trỏ trên màn hình.5
5 Dặn dò
- Xem kỹ lại các bài, chú ý các số lần lặp của chương trình for … do
- Tìm hiểu tiếp bài tập 3 (SGK/67)
IV RÚT KINH NGHIỆM
Trang 3
Tuần: 21 Ngày soạn
19/01/2013
23/01/2013
Bài thực hành số 5
Sử dụng lệnh lặp For … do (T2)
I MỤC TIÊU
1 Kiến thức
Viết được chương trình có sư dụng vòng lặp For…do lồng nhau;
2 Kĩ năng
- Rèn kỹ năng đọc hiểu chương trình có sử dụng vòng lặp for … do
3 Thái độ
- Nghiêm túc trong học tập, ý thức tự tìm tòi và nghiên cứu bài, ham thích môn học
II CHUẨN BỊ
.Giáo viên
- Giáo án, sách giáo khoa, phấn, bảng, máy tính, máy chiếu
2 Học sinh
- Sách giáo khoa, vở ghi, bút thước…
III NỘI DUNG VÀ TIẾN TRÌNH BÀI DẠY
1 Ổn định tổ chức lớp
Sĩ số của các lớp:
Sĩ số của các lớp:
Lớp 8A1: ……… ; 8A2: ……….; 8A3: ……… …
8A4: ……… ; 8A5: ……….; 8A6: ……… …
2 Kiểm tra bài cũ
Nhắc lại tác dụng của câu lệnh lặp với số lần biết trước?
3 Bài mới
Hoạt động của thầy Hoạt động của trò Kiến thức ghi bảng
Đưa chương trình sau:
Program Tao_bang;
Uses Crt;
Var
hang}
cot}
Begin
Clrscr;{xoa man hinh}
For i:=0 to 9 do {viet
Đọc kĩ chương trình ghi cụ
Var
cua hang}
cua cot}
Begin
Clrscr;{xoa man hinh}
For i:=0 to 9 do
Trang 4theo tung hang}
begin
For j:=0 to 9 do {viet
theo tung cot tren moi hang}
write(10*i+j:4);
{viet cac so ij ra man hinh}
hang moi}
end; {xong hang thu i}
trinh de xem ket qua}
end
GV:Hãy quan sát bảng ban đầu và
cho biết cần khai báo những biến
nào?
GV: Kiểu dữ liệu tương ứng của từng
biến là gì?
Ta có thể sử dụng kiểu integer được
không?
GV: Vì yêu cầu của bảng là chỉ xuất
từ 0 đến 99 cho nên ta chỉ cần khai
báo kiểu byte
GV: Cho HS tìm hiểu kĩ phần thân
chương trình:
Quan sát bảng em thấy các số được
sắp xếp như thế nào?
Nếu chỉ sử dụng một vòng lặp For…
do thì các số có xuất ra như bảng
trên không?
Vì vậy ta cần sử dụng thêm một vòng
lặp nữa để các cột được xuất ra màn
hình như bảng trên
- Chỉ số hàng sẽ nằm trong khoảng
nào?
- Chỉ số cột sẽ viết như thế nào?
GV: Công việc tiếp theo sau khi sử
dụng hai vòng lặp sẽ là gì?
GV: Yêu cầu HS gõ đúng chương
trình
GV: Yêu cầu HS chạy thử chương
trình
HS: Cần có chỉ số hàng, chỉ
số cột HS: Kiểu byte
HS: Có thể sử dụng kiểu integer
HS: Các số được sắp xếp theo hàng và theo cột HS: Chỉ xuất được một hàng
từ 0 - 9
HS: Chỉ số hàng nằm trong khoảng từ 0 – 9
HS: Viết theo từng cột trên mỗi hàng
HS: Viết các số ra màn hình
HS gõ đúng chương trình
HS chạy thử chương trình
{viet theo tung hang}
begin For j:=0 to 9 do
{viet theo tung cot tren moi hang}
write(10*i+j:4); {viet cac so ij ra man hinh}
writeln;
{xuong hang moi}
end; {xong hang
thu i}
chuong trinh de xem ket qua}
end
4 Củng cố
Giống như các câu lệnh rẽ nhánh If…then, các câu lệnh For …do cũng có thể lồng trong
nhau Do đó các biến đếm trong các câu lệnh lặp phải khác nhau
Lưu ý các câu lệnh để điều chỉnh kết quả ra màn hình
5 Dặn dò
- Xem kĩ 3 ví dụ trong SGK và lưu ý các phần chú thích
- Nắm thật vững tác dụng của câu lệnh lặp với số lần biết trước
- Cho bài toán sau:
“Tìm số n nhỏ nhất sao cho 1/n bé hơn 8, 43” Hoàn thành bài toán vào vở
Trang 5IV RÚT KINH NGHIỆM