Gõ chương trình b/Lưu Pro và sửa loêi.

Một phần của tài liệu Giáo án tin 8 new từ tuần 9 (Trang 27 - 29)

C. TIÊN TRÌNH LEĐN LỚP:

a/ Gõ chương trình b/Lưu Pro và sửa loêi.

b/Lưu Pro và sửa loêi.

c/ Cháy Pro với boơ dữ lieơu (1.5,1.6), (1.6,1.5) và (1.6,1.6). Nxét và tìm ra choê chưa đúng (1.6,1.6). Nxét và tìm ra choê chưa đúng

- Nêu Long<Trang đúng thì “Ban Trang cao hon”. Nêu sai thì “Hai ban cao bang nhau”.

- Nêu Long>Trang là đúng thì “Ban Long cao hon” và xét đên Đk 2 Long< Trang mà sai thì “Hai ban cao bang nhau”. Đađy chính là loêi khi đưa ra kêt quạ.

Ta có theơ sửa lái như sau:

If Long> Trang then Writeln(‘Ban Long cao hon’); If Long = Trang then Writeln(‘Hai ban cao bang nhau’);

If Long <Trang then Writeln(‘Ban Trang cao hon’);

Hs: Thực hieơn gõ lái Pro và cháy lái boơ Pro tređn.

như sau:

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’);

d/Sửa lái cho đúng Pro.

TIÊT 31

HỐT ĐOƠNG 3: Tìm hieơu cách kêt hợp nhieău phép so sánh và giại quyêt bài toán 3

Gv: Neđu cú pháp phép And và giá trị cụa nó.

Hs: Xác định tính đúng sai cụa phép so sánh

Gv: Neđu cú pháp phép And và giá trị cụa nó.

Hs: Xác định tính đúng sai cụa phép so sánh

Gv: Giại thích cho Hs hieơu veă đieău kieơn đeơ 3 sô a,b,c là 3 cánh cụa tam giác.

Hs: Thực hieơn gõ Pro và tìm hieơu các leơnh

A.Tìm hieơu cách kêt hợp các phép so sánh a. Phép And

Cp: <SS1> and (SS2) and <SS3> ....

Giá trị cụa phép And chư đúng khi tât cạ các so sánh đeău đúng.

Vd: (2>1) and (3>=3): Đúng (2=3) and (2>1): Sai b. Phép Or

Cp: <SS1> Or (SS2) Or <SS3> ....

Giá trị cụa phép Or chư đúng khi moơt trong các SS là đúng.

Vd: (5 div 2 =1) or (5 mod 2 = 1): Đúng (5 mod 5 <>0) or (5 div 4=2): Sai

Bài 3: Sgk

Cháy thử Pro với boơ DL 3 sô a,b,c: (3,5,6), (2,6,8), (4,7,1), (3,4,5) và (6,7,8).

Lưu chương trinh : Tam_giac.Pas

HỐT ĐOƠNG 4: Viêt chương trình giại và bieơn luaơn phương trình baơc nhât bx + c=0

Hs: Neđu ra thuaơt toán đã được hĩc Gv: Nx và Y/c Hs viêt Pro

*Action Program Ptb1; Uses crt; Var b,c:Real Begin Write(‘Nhap a:’);Readln(b); Write(‘Nhap b:’);Readln(c); If b<>0 then 1.Tìm thuaơt toán Thuaơt toán:

Bước 1: Nêu b = 0 chuyeơn tới bước 3.

Bước 2: Tính nghieơm pt x= -c/b, chuyeơn sang bước 4.

Bước 3: Nêu c =0, thođng báo chương trình đã cho vođ sô nghieơm. Ngược lái (c = 0), thođng báo phương trình có vođ nghieơm.

Writeln(‘Nghiem phuong trinh la:’,-b/a:4:2) Else if c=0 then Writeln(‘Pt co vo so nghiem’)

Else writeln(‘Phuong trinh vo nghiem’); Readln;

End.

IV.Cụng cô:

- Sys lái các bài toán đã thực hieơn.

V. Daịn dò, hướng dăn hĩc sinh hĩc taơp ở nhà

- Y/c hs veă nhà hĩc bài chuaơn bị cho tiêt kieơm tra thực hành saĩp tới.

TUAĂN 16 Ngày sốn: 01/12/2008

TIÊT 32 Ngày kieơm tra: 09/12/2008

Một phần của tài liệu Giáo án tin 8 new từ tuần 9 (Trang 27 - 29)

Tải bản đầy đủ (DOC)

(32 trang)
w