GIÁO ÁN TIN 8 HK2 (2014-2015)

Tuần: 20 Ngày Soạn: …….……/……./………
Tiết: 39 - 40 Ngày dạy :………..…./……./………
BÀI TẬP
I. MỤC TIÊU:
1. Kiến thức:
- Sử dụng các kiến thức đã học để làm một số bài tập
2. Kĩ năng:
- Rèn luyện kĩ năng sử dụng các câu lệnh trong Pascal
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Ị:
Sách giáo khoa, máy tính điện tử.
III. PHƯƠNG PHÁP
- Giải đáp, hướng dẫn.
IV. HOẠT ĐỘNG DẠY HỌC
HOẠT ĐỘNG CỦA THẦY
HOẠT ĐỘNG CỦATRÒ
NỘI DUNG

Hoạt động 1: Bài tập 1.


Tính tam giác: Nụâp vào ba số a,b,c bất kì. Kiểm tra xem nó có thể là độ dài ba cạnh hay không, nếu không thì in ra màn hình ` Khong la ba canh cua mot tam giac`. Ngược lại, thì in diện tích, chu vi của tam giác ra màn hình.




+ HS thực hiện theo đúng yêu cầu.


1. Bài tập 1
Program TAMGIAC;
Uses crt;
Var a,b,c,s,p : real;
Begin
Clrscr;
Writeln(‘ nhập 3 cạnh :’); Readln(a,b,c);
If (a+b)>c and (a+c)>b and (b+c)>a then
Begin
p:= abc; s:=sqrt(p*(p-a)*(p-b)*(p-c));
end else writeln(‘a;b;c không là ba cạnh của tam giác’); readln
end.

Hoạt động 2: Bài tập 2.


Tính xn (Với n là số nguyên không âm).

+ Học sinh đọc đề bài => suy nghĩ và trả lời.

2. Bài tập 2.
Program TINH_X_LUY_THUA_N;
Uses crt;
Var i,n,x:integer;
lt:real;
begin
writeln(‘tính luy thừa xmux n:’);
writeln(‘nhập x:’); readln(x);
writeln(‘nhập n:’); readln(n);
lt:= 1; for i:=1 to n do lt:=lt*i
writeln(‘ x^n :’,lt); readln
end.

V. DẶN DÒ
- Về nhà học bài kết hợp sách giáo khoa.
RÚT KINH NGHIỆM
……………………………………………………………………………………………………………………………………………………………………………………………………………………………………………………
Tuần: 21 Ngày Soạn: …….……/……./………
Tiết: 41 - 42 Ngày dạy :. …….……/……./………
Bài thực hành số 5
SỬ DỤNG LỆNH LẶP FOR ... DO

I. MỤC TIÊU:
1. Kiến thức:
- Biết viết chương trình Pascal có câu lệnh lặp For..do.
2. Kĩ năng:
- Rèn luyện kĩ năng đọc hiểu chương trình
3. Thái độ:
- Thái độ học tập nghiêm túc, yêu thích viết chương trình để thực hiện một số công việc.
II. CHUẨN BỊ:
- Gv: Nội dung bài thực hành, máy tính điện tử.
- Hs: Ôn lại lý thuyết ,đọc trước bài thực hành.
III. PHƯƠNG PHÁP
- Giải đáp, hướng dẫn, thực hành trên máy tính
IV. HOẠT ĐỘNG DẠY HỌC:
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 lặp For..do.


? Hãy nêu cú pháp và chức năng của câu lệnh lặp For..do














- Cú pháp: For := to do ;

+ Hoạt động của vòng lặp:
- B1: biến đếm nhận giá trị đầu
- B2: Chương trình kiểm tra biểu thức điều kiện, nếu biểu thức điều kiện đúng thì thực hiện câu lệnh.
- B3: Biến đếm tự động tăng lên 1 đơn vị và quay lại B2.
- B4: Nếu biểu thức điều kiện nhận giá trị sai thì thoát ra khỏi vòng lặp.

1. Ôn lại câu lệnh lặp For..do:

+ Cú pháp:

+ Hoạt động











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

- Gõ chương trình sau đây:

uses crt;
var N,i:integer;
begin
clrscr;
write(`Nhap so N=`);