Bài thực hành 5. Sử dụng lệnh lặp For….Do

Ngày soạn: 09/01/2016 Ngày dạy: 12/01/2016 Dạy lớp: 8A
Ngày soạn: 10/01/2016 16/01/2016 Dạy lớp: 8B

Tiết 38,39,40

BÀI TH 5: SỬ DỤNG LỆNH LẶP FOR…DO (t1)
I. MỤC TIÊU:
1. Kiến thức
- Biết viết chương trình có sử dụng vòng lặp for…do.
- HS 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
2. Kĩ năng
- Biết cú pháp của câu lệnh lặp, vận dụng các kiến thức để làm bài tập.
3. Thái độ
- Hình thành hoạt động theo nhóm, có ý thức tự chủ trong học tập
II. CHUẨN BỊ:
1. Giáo viên: Giáo án, SGK..
2. HS: học bài cũ, SGK, vở, đọc trước bài mới.
III. TIẾN TRÌNH:
1. Ổn định lớp: (1’) Kiểm tra sĩ số
2. Kiểm tra bài cũ: (7’)
* Câu 1: Viết cấu trúc câu lệnh lặp và mô tả hoạt động của nó?
* Câu 2: Hãy cho biết tác dụng của câu lệnh lặp với số lần biết trước.
* Đặt vấn đề: (1’)
Bây giờ chúng ta sẽ làm tiếp một số bài tập tiếp theo.
3. Bài mới
Hoạt động của GV và HS
Ghi bảng

HĐ1: (10)`
- GV: hóy gừ chương trỡnh trứng rơi vào mỏy và chạy thử.
HĐ2: (20’)
- ? em nào biết ý tưởng của bài này ta làm thế nào?
- GV: ta nhập số vào từ bàn phớm và sử dụng 1 vũng for cho chạy từ 1 đến 10. Sau đú nhõn số vừa nhập với từng biến trong vũng for đú.
- HS nghiờn cứu chương trỡnh SGK cựng nhúm thảo luận và cho biết chương trỡnh chạy như thế nào? và hoàn thành bảng tiến trỡnh sau:
Bước
i
i(10?
writeln(N,` x`,i,` = `, N*i)

1
1
T
3x1 = 3

2
2
T
3x2 = 6

3
3
T
3x3 = 9

4
4
T
3x4 = 12

5
5
T
3x5 = 15

6
6
T
3x6 = 18

7
7
T
3x7 = 21

8
8
T
3x8 = 24

9
9
T
3x9 = 27

10
10
T
3x10 = 30

11
11
F
khụng thực hiện lệnh writeln kết thỳc

- GV yêu cầu HS gõ chương trình vào máy và chạy chương trình với các giá trị nhập lần lượt bằng 1,2, ...10 sau đó quan sát kết quả
- Khi chạy chương trình đó có nhược điểm gì không?



1. Bài 1: Viết chương trình in ra màn hình bảng nhân của 1 số từ 1 đến 9, số được nhập từ bàn phím và dừng màn hình để quan sát kết quả.

Program bang_nhan;
uses crt;
var N,i : integer;
begin
clrscr;
Write(`Nhập số N=`); Readln(N);
Writeln;
Write(`bang nhan `,N);
Writeln;
for i:= 1 to 10 do
writeln(N,` x`,i:2,` = `, N*i:3);
readln;
end.












4. Củng cố, luyện tập (3’)
- Củng cố lại các thuật toán trong các bài tập
5. Hướng dẫn HS học tập về nhà (3’)
- Học bài trong vở ghi và SGK.
- Hoàn thiện thêm các bài trên lớp
- Đọc trước bài tập 2 để tiết sau thực hành.
*. RÚT KINH NGHIỆM
....................................................................................................................................
...................................................................................................................................

Ngµy 11 th¸ng 01 n¨m 2016
Ký duyÖt cña TT

Nguyễn văn Đông






Ngày soạn: 15/01/2016 Ngày dạy: 18/01/2016 Dạy lớp: 8A
Ngày soạn: 17/01/2016 20/01/2016 Dạy lớp: 8B

Tiết 38,39,40