GV: đưa nội dung chương trình bài thực HS: hoạt động hµnh 3 lªn mµn h×nh, theo nhãm, yêu cầu học sinh đọc t×m hiÓu ho¹t chương trình, tìm hiểu động của chhoạt động của chương ương trinh,[r]
Trang 1Ngày soạn:10/01/2010
Ngày dạy:15/01/2010
Tiết: 42:
Bài thực hành 5: Sử dụng lệnh lặp for do
I Mục tiêu :
1 Kiến thức Vận dụng kiến thức của vòng lặp for do, câu lệnh ghép để viết ch"# trình
2 Kỹ năng
Viết đ"% ch"# 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"# trình có sử dụng vòng lặp for do
3 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
III chuẩn bị của GV, HS
1 Chuẩn bị của GV: - Giáo án, SGK, phòng máy, phần mềm pascal
2 Chuẩn bị của HS: - SGK, vở ghi, bút,nghiên cứu "A bài
IV Tiến Trình lên lớp :
Hoạt động 1: 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
- GV: yêu cầu học sinh
mở ch"# trình
và sửa lại ch"# 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
- HS: quan sát
và đa ra nhận xét
HS: gõ ch"#
trình vào máy, sửa lỗi chính tả, chạy ch"#
trình, quan sát kết quả
HS: quan sát và
Bài 2 sgk (T63) a) Giới thiệu lệnh gotoxy(), wherex
- 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
- Wherex: cho biết số thứ tự của cột, wherey cho biết số thứ tự của hàng
* Lưu ý: 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"# trình nh sau:
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 begin
gotoxy(5, wherey);
Writeln(n,’x’,i:2,’=’,n*i:3);
Readln;
Lop7.net
Trang 2dùng lệnh gotoxy(5,
wherey)
nhận xét End
Hoạt động 2: sử dụng lệnh For lồng trong for
GV: giới thiệu cấu trúc
dẫn học sinh cách sử
dụng lệnh
GV: đ" nội dung
ch-"# trình bài thực
hành 3 lên màn hình,
yêu cầu học sinh đọc
ch"# trình, tìm hiểu
trình
GV: cho chạy ch"#
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-"# trinh, đại diện của
nhóm báo cáo kết quả thảo luận
HS : quan sát kết quả trên màn hình
Bài 3 SGK (T64)
a) 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
Hoạt động 3: kết thúc
ứng dụng, tắt máy, tắt
nguồn
Hoạt động 4: củng cố và dặn dò
cho kết quả in ra màn hình
IV Rút kinh nghiệm:
Lop7.net
... data-page="2">dùng lệnh gotoxy(5,
wherey)
nhận xét End
Hoạt động 2: sử dụng lệnh For lồng for
GV: giới thiệu cấu trúc
dẫn học sinh cách sử
dụng lệnh
GV:... thiệu câu
lệnh gotoxy where
- GV: yêu cầu học sinh
mở ch"# trình
sửa lại ch"# trình
theo hình
của giáo viên
GV: yêu cầu học sinh
quan... :
Hoạt động 1: Làm đẹp hình kết lệnh gotoxy, where
- Giáo viên cho chạy kết
quả thực hành
Bang_cuu_chuong Yêu
cầu học sinh quan sát
kết nhận xét
khoảng