Giáo án môn Tin học 8 - Tuần 12

Ngày dạy:..............................
Tiết 23 Bài thực hành số 4
SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF...THEN
 I. MỤC TIÊU CẦN ĐẠT
 1. Kiến thức:
	- Luyện tập sử dụng câu lệnh If...then
	 2. Kĩ năng:
	- Rè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 
	 3. Thái độ:
	- Thái độ học tập nghiêm túc, yêu thích môn học.
 II. CHUẨN BỊ CỦA GIÁO VIÊN VÀ HỌC SINH
 1. GV:Nội dung bài thực hành, máy tính điện tử.
 2. HS: Sách ,vở,bút.
III. TỔ CHỨC HOẠT ĐỘNG DAỴ VÀ HỌC
Ổn định lớp
Kiểm tra bài cũ: Kết hợp khi thực hành
 Giới thiệu bài mới: Để củng cố bài học hôm trước hôm nay ta vào tiết thực hành.
Bài mới:	
HOẠT ĐỘNG CỦA THẦY
HOẠT ĐỘNG CỦA TRÒ
NỘI DUNG
Hoạt động 1: Ôn lại câu lệnh điều kiện
? Nêu cú pháp và hoạt động của câu lệnh điều kiện dạng thiếu và dạng đủ. 
a) Dạng thiếu:
- Cú pháp:
IF then ;
- Hoạt động: Chương trình sẽ kiêm tra điều kiện. Nếu điều kiện được thoã mãn, chương trình sẽ thực hiện câu lệnh sau từ khoá then, ngược lại câu lệnh đó bị bỏ qua.
b) Dạng đủ:
- Cú pháp: If then Else ;
- Hoạt động: Chương trình sẽ kiểm tra điều kiện. Nếu điều kiện được thoã mãn, chương trình sẽ thực hiện câu lệnh 1 sau từ khoá then, ngược lại câu lệnh 2 sẽ được thực hiện.
Ôn lại câu lệnh điều kiện:
Hoạt động 2: Làm bài tập1/52
- Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn phím và in hai số đó ra màn hình theo thứ tự không giảm
- Gõ chương trình sau:
program sapxep ;
uses crt ;
var a,b : integer ;
begin
 clrscr ;
 write(‘ nhap so a : ‘) ; readln(a) ;
 write(‘ nhap so b : ‘) ; readln(b) ;
if a < b then write(a,’ ‘,b) else 
writeln(b,’ ‘,a) ;
readln ;
- Tìm hiểu ý nghĩa của các câu lệnh trong chương trình.
- Dịch và chạy chương trình
+ Học sinh chú ý lắng nghe
+ Học sinh độc lập gõ chương trình vào máy
+ Học sinh tìm hiểu ý nghĩa của các câu lệnh trong chương trình theo yêu cầu của giáo viên.
+ Nhấn F9 để dịch và nhấn Ctrl + F9 để chạy chương trình.
2-Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn phím và in hai số đó ra màn hình theo thứ tự không giảm
program sapxep ;
uses crt ;
var a,b : integer ;
begin
 clrscr ;
 write(‘ nhap so a : ‘) ; readln(a) ;
 write(‘ nhap so b : ‘) ; readln(b) ;
 if a < b then 
write(a,’ ‘,b) else 
writeln(b,’ ‘,a) ;
readln ;
Sơ kết bài
	* Củng cố: giảng giải thêm các bài tập cho học sinh nắm lại kiến thức
	* Hướng dẫn về nhà
	- Tiết sau thực hành: “ Bài thực hành số 4” (tt)
 6. Rút kinh nghiệm
................................................................................................................................................................................................................................................................................
Ngày dạy:..............................
Tiết 24 
Bài thực hành số 4 (tt)
SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF...THEN
 I. MỤC TIÊU CẦN ĐẠT
	1. Kiến thức:
	- Luyện tập sử dụng câu lệnh If...then
	2. Kĩ năng:
 - Rè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 
	3. Thái độ:
	- Thái độ học tập nghiêm túc, yêu thích môn học.
 II. CHUẨN BỊ CỦA GIÁO VIÊN VÀ HỌC SINH
1. GV:Nội dung bài thực hành, máy tính điện tử.
2. HS: Sách ,vở,bút.
III. TỔ CHỨC HOẠT ĐỘNG DẠY VÀ HỌC
Ổn định lớp: kiểm tra sĩ số hs
Kiểm tra bài cũ
Bài mới
HOẠT ĐỘNG CỦA THẦY
HOẠT ĐỘNG CỦA TRÒ
NỘI DUNG
Hoạt động 1: Làm bài tập 2/53
- Viết chương trình nhập chiều cao của hai bạn Long và Trang, in ra màn kết quả so sánh chiều cao của 2 bạn.
- Yêu cầu học sinh viết và gõ chương trình vào máy.
+ Học sinh chú ý lắng nghe.
+ Viết và gõ chương trình vào máy.
Program Ai_cao_hon;
Var long, trang: real;
Begin
Writeln(‘ nhap chieu cao cua Long’); Readln(long);
Writeln(‘nhap chieu cao cua Trang’); Readln(trang);
If long>trang then 
Writeln(‘bạn Long cao hon’);
If Long<trang then 
Writeln(‘ban Trang cao hon’) else
Writeln(‘hai ban bang nhau’);
Readln;
End. 
3. 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
- Lưu chương trình với tên aicaohon.pas. Dịch và sửa lỗi chương trình
+ Học sinh lưu, sửa lỗi và chạy chương trình theo yêu cầu của giáo viên.
Hoạt động 2: Làm bài tập 3/53
- Dưới đây là chương trình nhập ba số dương 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ác cạnh của một tam giác hay không.
- Tìm hiểu ý nghĩa của các câu lệnh trong chương trình.
- Dịch và chạy chương trình
+ Gõ chương trình vào máy.
Program ba_canh_tam_giac;
Var a,b,c: real;
Begin
Write(‘nhap ba so a, b và c:’);
Readln(a,b,c);
If (a+b>c) and (b+c>a) and (c+a>b) then
Writeln(‘a,b,c là ba cạnh của tam giác’) else
Writeln(‘a,b,c khong la ba canh cua tam giac’);
Readln;
End.
+ Học sinh tìm hiểu ý nghĩa của các câu lệnh trong chương trình theo yêu cầu của giáo viên.
+ Nhấn F9 để dịch và nhấn Ctrl + F9 để chạy chương trình.
4. Viết chương trình nhập ba số dương a và b, c khác nhau từ bàn phím kiểm tra ba số đó có là độ dài ba cạnh của tam giác không?
5. Sơ kết bài
	* Củng cố: giảng giải thêm các bài tập cho học sinh nắm lại kiến thức
	* Hướng dẫn về nhà
	Xem lại các bài trước tiết sau ôn tập
Rút kinh nghiệm
................................................................................................................................................................................................................................................................................