Giáo án Tin học 8 - Tiết 31-32 - Năm học 2010-2011

Ngày soạn: 12/12/2010
Tiết 31	Bài thực hành 4 : 
 SỬ DỤNG câu lệnh IF .THEN (t1)
Ngày giảng
......../......../2010
Lớp/sĩ số
8A:
8B:
A. Mục tiêu.
Luyợ̀n tọ̃p sử dụng cõu lợ̀nh if . Then .
Rèn luyợ̀n kĩ năng ban đõ̀u vờ̀ đọc các chương trình đơn giản và hiờ̉u được ý nghĩa của thuọ̃t toán sử dụng trong chương trình .
B. Chuẩn bị.
- GV: SGK, giáo án, phòng máy vi tính.
- HS: SGK, vở ghi, bài cũ.
C. Tiến trình dạy học.
1. ổn định tổ chức.
2. Kiểm tra bài cũ.
?H: Kiểm tra trong giờ thực hành.
3. Bài mới
Hoạt động của thầy và trò
Nội dung cần đạt
Hoạt động 1: Hướng dẫn mở đầu
- GV nêu mục đích, yêu cầu bài thực hành.
- HS khởi động máy tính.
Hoạt động 2: Thực hành
- ?H: Cho biết cấu trúc câu lệnh điều kiện trong nnlt pascal?
- HS trả lời
- GV đưa ra bài tập 1 sgk/52
Bài 1 : Viờ́t chương trình nhọ̃p hai sụ́ nguyờn a và b từ bàn phím và in hai sụ́ đó ra màn hình theo thứ tự khụng giảm
?H: mô tả thuật toán bài toán trên?
- HS trả lời
?H: Viết chương trình cho bài toán?
- HS viết chương trình trên máy tính của mình.
- Gv quan sát quá trình làm bài của hs và nhận xét.
- GV đưa ra bài tập 2 sgk/53
Bài 2. Viết chương trỡnh nhập chiều cao của hai bạn Long và Trang, in ra màn hỡnh kết quả so sỏnh chiều cao của hai bạn, chẳng hạn "Bạn Long cao hơn". Tham khảo thuật toỏn trong vớ dụ 5, bài 5.
?H: mô tả thuật toán bài toán trên?
- HS trả lời
?H: Viết chương trình cho bài toán?
- HS viết chương trình trên máy tính của mình.
- Gv quan sát quá trình làm bài của hs và nhận xét.
- Dạng thiếu:
Nếu thì ;
If then ;
- Dạng đủ:
Nếu thì nếu không thì ;
If then else ;
Bài 1:
Program sapxep;
Uses crt;
Var a, b : integer;
Begin
 Clrscr;
Write (‘a=’) ; readln(a);
Write (‘b=’) ; readln(b);
If a < b then write (a, ‘ ‘, b) else write (b, ‘ ‘, a);
Readln;
End.
Bài 2: 
program Ai_cao_hon;
uses crt;
var 	Long, Trang: Real; 
begin
clrscr;
 write('Nhap chieu cao cua Long:'); readln(Long);
write('Nhap chieu cao cua Trang:'); readln(Trang);
If Long>Trang then writeln('Ban Long cao hon') 
else If Long<Trang then writeln('Ban Trang cao hon')
 else writeln('Hai ban cao bang nhau');
readln
end.
Hoạt động 3: Tổng kết thực hành
- GV nhận xét buổi thực hành
- HS vệ sinh phòng máy.
4. Củng cố.
- GV hệ thống lại kiến thức toàn bài
5. Hướng dẫn về nhà
- Học bài, 
- Đọc trước bài mới.
Ngày soạn: 11/12/2010
Tiết 32	Bài thực hành 4: 
 SỬ DỤNG câu lệnh IF .THEN (t2)
Ngày giảng
......../......../2010
Lớp/sĩ số
8A:
8B:
A. Mục tiêu.
Luyện tập sử dụng cõu lệnh điều kiện Ifthen.
Rốn luyện kỹ năng ban đầu về đọc cỏc chương trỡnh đơn giản và hiểu được ý nghĩa của thuật toỏn sử dụng trong chương trỡnh.
B. Chuẩn bị.
- GV: SGK, giáo án, phòng máy vi tính.
- HS: SGK, vở ghi, bài cũ.
C. Tiến trình dạy học.
1. ổn định tổ chức.
2. Kiểm tra bài cũ.
?H: Cho biết cấu trúc câu lệnh điều kiện trong nnlt pascal?
3. Bài mới
Hoạt động của thầy và trò
Nội dung cần đạt
Hoạt động 1: Hướng dẫn mở đầu
- GV nêu mục đích, yêu cầu bài thực hành.
- HS khởi động máy tính.
Hoạt động 2: Thực hành
- GV đưa ra bài tập 3 sgk/54
Bài 3. Chương trỡnh nhập ba số nguyờn a, b, c từ bàn phớm, kiểm tra và in ra màn hỡnh kết quả kiểm tra ba số đú cú thể là độ dài của một tam giỏc hay khụng.
?H : Xác định bài toán ?
- HS tìm input, output của bài toán ?
?H: mô tả thuật toán bài toán trên?
- HS trả lời
?H: Viết chương trình cho bài toán?
- HS viết chương trình trên máy tính của mình.
- Gv quan sát quá trình làm bài của hs và nhận xét.
- Gv đưa ra bài tập 4:
Bài 4: Viết chương trỡnh nhập vào điểm bài kiểm tra của một bạn nào đú và đưa ra thụng bỏo :
-Nếu điểm nhỏ hơn 5, in ra dòng chữ "Ban can co gang hon";
-Nếu điểm lớn hơn hoặc bằng 5 và nhỏ hơn 6.5, in ra dòng chữ "Ban dat diem trung binh";
-Nếu điểm lớn hơn hoặc bằng 6.5 và nhỏ hơn 8, in ra dòng chữ "Ban dat diem Kha";
-Nếu điểm lớn hơn hoặc bằng 8, in ra dòng chữ "Hoan ho ban dat diem Gioi".
?H : Xác định bài toán ?
- HS tìm input, output của bài toán ?
?H: mô tả thuật toán bài toán trên?
- HS trả lời
?H: Viết chương trình cho bài toán?
- HS viết chương trình trên máy tính của mình.
- Gv quan sát quá trình làm bài của hs và nhận xét.
-Input: 3 số a, b, c lớn hơn 0
-Output: Thụng bỏo 3 số a, b, c cú phải là ba cạnh của một tam giỏc hay khụng?
* Mụ tả thuật toỏn:
B1: Nhập a, b, c >0
B2: Nếu (b+c>a) và (a+b>c) và (c+a>b), kết quả a, b,c là ba cạnh của một tam giỏc rồi chuyển qua B4
B3: Thụng bỏo a, b, c khụng phải là ba cạnh của một tam giỏc và chuyển qua B4.
B4: Kết thỳc chương trỡnh.
- Chương trỡnh (SGK trang 54)
Bài 4:
program diem kiem tra;
uses crt;
var dkt:real;
begin
 clrscr;
 if dkt<5 then writeln(‘ban can co gang hon’);
 if (dkt>=5) and (dkt <6.5) then writeln(‘ ban dat diem trung binh’);
 if (dkt>=6.5) and (dkt <8) then writeln(‘ ban dat diem kha’)
 else writeln(‘ Hoan ho ban dat diem gioi’);
readln;
end.
Hoạt động 3: Tổng kết thực hành
- GV nhận xét buổi thực hành
- HS vệ sinh phòng máy.
4. Củng cố.
- GV hệ thống lại kiến thức toàn bài
5. Hướng dẫn về nhà
- Học bài, học thuộc phần ghi nhớ. 
- Trả lời các câu hỏi và bài tập SGK.
- Đọc trước bài mới.