Nội dung đã học: Khởi động Turbo, soạn chương trình, dịch lỗi cú pháp, thực hiện chương trình, tìm lỗi thuËt to¸n vµ hiÖu chØnh.. C©u hái vµ bµi tËp vÒ nhµ: - Viết chương trình nhập vào [r]
(1) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 Bài 7: Các thủ tục chuẩn vào đơn giản Bài 8: Soạn thảo, dịch, thực và hiệu chỉnh chương trình Ngµy so¹n: Ngµy ®¨ng ký gi¸o ¸n: Người duyệt giáo án (TTCM duyệt, BGH duyệt): Bài 7: Các thủ tục chuẩn vào đơn giản I Môc tiªu: KiÕn thøc: - Biết ý nghĩa các thủ tục vào/ra chuẩn lập trình - BiÕt ®îc cÊu tróc chung cña thñ tôc vµo/ra ng«n ng÷ lËp tr×nh Pascal KÜ n¨ng: - Viết đúng lệnh vào/ra liệu - Biết nhập đúng liệu thực chương trình II §å dïng d¹y häc: ChuÈn bÞ cña gi¸o viªn - Gi¸o ¸n gi¶ng d¹y - S¸ch gi¸o khoa, tranh chøa c¸c biÓu thøc to¸n häc, m¸y chiÕu Projector, m¸y vi tính, số chương trình viết sẵn ChuÈn bÞ cña häc sinh - S¸ch gi¸o khoa - Bµi cò III Hoạt động dạy- học: Hoạt động 1: Tìm hiểu thủ tục nhập liệu từ bàn phím a Môc tiªu: - Gióp häc sinh thÊy ®îc sù cÇn thiÕt cña thñ tôc nhËp d÷ liÖu - BiÕt ®îc cÊu tróc chung cña thñ tôc nhËp d÷ liÖu b Néi dung: - Dùng để đưa nhiều liệu khác cho cùng chương trình xử lý - NhËp: Read/Readln (<tªn biÕn 1>, <tªn biÕn k>); c Các bước tiến hành: Hoạt động giáo viên Hoạt động học sinh Nêu vấn đề: Khi giải bài toán, Chú ý lắng nghe dẫn dắt giáo ta phải đưa liệu vào để máy tính xử lý, viên viÖc ®a d÷ liÖu b»ng lÖnh g¸n sÏ lµm cho chương trình có tác dụng với liệu cố định Để chương trình giải Lop11.com (2) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 ®îc nhiÒu bµi to¸n h¬n, ta ph¶i sö dông thñ tôc nhËp d÷ liÖu - Yêu cầu học sinh nghiên cứu SGK và cho - Nghiên cứu SGK và suy nghĩ để trả biÕt cÊu tróc chung cña thñ tôc nhËp d÷ liÖu lêi ng«n ng÷ Pascal Read(<tªn biÕn 1>, <tªn biÕn n>); Readln (<tªn biÕn 1>, <tªn biÕn n>); Khi gÆp c©u lÖnh Read (hoÆc Readln) chương trình chờ người dùng nhập giá trị cho danh s¸ch biÕn vµ nhÊn phÝm enter, chØ sau nhÊn phÝm Enter viÖc nhËp gi¸ trÞ cho danh s¸ch biÕn míi kÕt thóc vµ lÖnh tiÕp theo ®îc thùc hiÖn - Nêu ví dụ: Khi viết chương trình giải - Phải nhập giá trị cho hai biến a,b phương trình ax+b =0, ta phải nhập vào các - Viết lệnh Read(a,b); đại lượng nào? Viết lệnh nhập? GV: ViÖc nhËp gi¸ trÞ cña biÕn tõ bµn phÝm ®îc kÕt thóc bëi viÖc nhÊn phÝm Enter nªn kh«ng ph©n biÖt read vµ readln Ngoµi ra, readln không tham số có tác dụng chờ người dùng nhấn phím Enter trước thực chương trình, nhờ đó người dùng có thể xem kết trước đó còn lưu trên màn hình Tuy nhiªn, lu ý kh«ng cÇn xem kÕt qu¶ trªn mµn h×nh th× kh«ng nªn dïng readln v× dïng readln kh«ng tham sè vµ kh«ng cã thông báo hướng dẫn thì người dùng có thể nhầm tưởng chương trình chạy và kh«ng nhÊn phÝm Enter Chiếu chương trình Pascal đơn giản Quan sát chương trình ví dụ gi¸o viªn cã lÖnh nhËp gi¸ trÞ cho hai biÕn - Thực chương trình và thực nhập d÷ liÖu Hái: Khi nhËp gi¸ trÞ cho nhiÒu biÕn ta ph¶i - Nh÷ng gi¸ trÞ nµy ph¶i ®îc gâ c¸ch Ýt nhÊt dÊu c¸ch hoÆc ký tù thùc hiÖn nh thÕ nµo ? xuèng dßng - Lªn b¶ng thùc hiÖn nhËp theo yªu - Yªu cÇu häc sinh thùc hiÖn nhËp d÷ liÖu cÇu cña gi¸o viªn cho chương trình Hoạt động 2: Tìm hiểu thủ tục đưa liệu màn hình a Môc tiªu: - Gióp häc sinh thÊy ®îc sù cÇn thiÕt cña thñ tôc ®a d÷ liÖu mµn h×nh - BiÕt ®îc cÊu tróc chung cña thñ tôc ®a d÷ liÖu mµn h×nh b Néi dung: Lop11.com (3) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 - Dùng để đưa kết sau xử lý màn hình để người sử dụng thấy - XuÊt: Write/Writeln (<tªn biÕn 1>, <tªn biÕn n>); c Các bước tiến hành Hoạt động giáo viên Hoạt động học sinh Sau xö lÝ xong, kÕt qu¶ t×m thÊy ®îc ®ang ®îc lu bé nhí §Ó thÊy ®îc kÕt qu¶ trªn mµ h×nh ta sö dông thñ tôc xuÊt d÷ liÖu - Yªu cÇu häc sinh nghiªn cøu SGK vµ cho biÕt cÊu tróc chung cña thñ tôc xuÊt d÷ liÖu ng«n ng÷ lËp tr×nh Pascal: Chó ý l¾ng nghe dÉn d¾t cña gi¸o viªn - Nghiªn cøu SGK vµ tr¶ lêi Write(<tªn biÕn 1>, <tªn biÕn n>); Writeln(<tªn biÕn 1>, <tªn biÕn n>); - Nêu ví dụ: Khi viết chương trình giải - Viết lệnh Writeln(-b/a); phương trình ax+b=0, ta phải đưa màn h×nh gi¸ trÞ cña nghiÖm x= -b/a, ta ph¶i viÕt lÖnh nh thÕ nµo? Chiếu chương trình pascal đơn giản Quan sát chương trình ví dụ GV Program vd; Var x,y,z:integer; Begin Writeln('Nhap vao hai so'); Readln(x,y); z:=x+y; Write(x:6,y:6,z:6); Readln; End - Thực chương trình và thực nhập liệu để học sinh thấy kết trên màn h×nh - Hái: Chøc n¨ng cña lÖnh Writeln(); - ViÕt mµn h×nh dßng ch÷ vµ ®a trá xuèng dßng - Hỏi: ý nghĩa :6 lệnh Writeln( ); - Dành vị trí trên màn hình để viết số x; vị trí tiếp để viết số y và vị trí tiếp để viết số z - Hái: Khi c¸c tham sè lÖnh Write() - Khi c¸c tham sè cã kiÓu ký tù, viÖc thuộc kiểu Char real thì qui định vị trí quy định vị trí giống kiểu nguyên nh thÕ nµo? - Khi tham sè cã kiÓu thùc th× ph¶i quy định loại vị trí: vị trí cho toàn số thùc vµ vÞ trÝ cho phÇn thËp ph©n - Cho vÝ dô cô thÓ víi biÕn c kiÓu Char vµ r - VÝ dô: kiÓu real Write(c:8); Write(r:8:3); IV cñng cè Nội dung đã học: Lop11.com (4) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 - NhËp d÷ liÖu Read/Readln(<tªn biÕn 1>, <tªn biÕn k>);; - XuÊt d÷ liÖu Write/Writeln(<tªn biÕn 1>, <tªn biÕn k>);; C©u hái vµ bµi tËp vÒ nhµ: - B»ng thùc hµnh trªn m¸y, so s¸nh sù gièng vµ kh¸c gi÷a Read vµ Readln; gi÷a Write vµ Writeln - T×m hiÓu chøc n¨ng cña lÖnh Readln vµ Writeln Bài 8: Soạn thảo, dịch, thực và hiệu chỉnh chương trình I Môc tiªu: KiÕn thøc: - Biết các bước để hoàn thành chương trình - Biết các file chương trình Turbo Pascal 7.0 Kü n¨ng: - Biết khởi động và thoát hệ soạn thảo Turbo Pascal - Soạn chương trình vào máy - Dịch chương trình để phát lỗi cú pháp - Thực chương trình để nhập liệu và thu kết quả, tìm lỗi thuật toán và sửa lỗi II §å dïng d¹y häc: ChuÈn bÞ cña gi¸o viªn: - Gi¸o ¸n gi¶ng d¹y - M¸y tÝnh cã cµi phÇn mÒm Turbo Pascal, m¸y chiÕu Project, m¸y chiÕu vËt thÓ ChuÈn bÞ cña häc sinh: - SGK III Hoạt động dạy- học: Hoạt động 1: Làm quen với Turbo Pascal 7.0 a Môc tiªu: - Biết các file chương trình Turbo Pascal 7.0 - Biết cách khởi động và thoát khỏi Turbo Pascal 7.0 b Néi dung: - ChuyÓn vµo th môc chøa file Turbo.exe - Gâ Turbo.exe vµ Enter (Nếu môi trường Win thì cần bấm biểu tượng Turbo Pascal c Các bước tiến hành: Hoạt động giáo viên Đặt vấn đề: Để sử dụng Turbo Pascal, trên máy phải có các file chương trình cần thiÕt Tham kh¶o SGK vµ cho biÕt tªn c¸c file chương trình đó? Trình diễn cách khởi động Turbo Pascal th«ng qua m¸y chiÕu Projector - Giới thiệu màn hình soạn thảo chương trình: B¶ng chän, trá, vïng so¹n th¶o Lop11.com Hoạt động học sinh Tham kh¶o SGK vµ tr¶ lêi Turbo Pascal Turbo.tpl Graph.tpu Egavga.bgi vµ c¸c file *.chr Häc sinh quan s¸t vµ ghi nhí (5) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 Hoạt động 2: Tập soạn thảo chương trình và dịch lỗi cú pháp a Môc tiªu: - HS biết cách tạo và lưu file chương trình, biết cách dịch và tìm lỗi cú pháp b Néi dung: - Gõ các lệnh chương trình (giống hệ soạn thảo văn bản) - Lưu file chương trình lên đĩa bấm F2 - Biªn dÞch lçi có ph¸p bÊm Alt+F9 c Các bước tiến hành Hoạt động giáo viên Soạn chương trình làm ví dụ, lưu chương tr×nh, dÞch lçi - Dùng máy chiếu vật thể để minh họa thao tác lưu file chương trình và biên dịch Soạn chương trình, hỏi các lỗi cú pháp chương trình, gọi HS dịch lỗi và sửa Program Vidu; Var X: Integer; Begin Write('Nhap mot so nguyen duong'); Read(x); Y: = Sqrt(x); Writeln(y); End Hoạt động học sinh Quan s¸t vµ ghi nhí : - Lu : F2 - DÞch lçi: Alt+F9 Quan sát và phát lỗi để sửa lỗi cho chương trình Program Vidu; Var X,Y: Integer; Begin Write('Nhap mot so nguyen duong'); Read(x); Y: = Sqrt(x); Writeln(y); End Hoạt động 3: Thực chương trình và tìm lỗi thuật toán để hiệu chỉnh a Môc tiªu: HS biết cách thực chương trình, biết cách nhập liệu và tìm lỗi thuật toán để hiÖu chØnh b Néi dung: - Thực chương trình: Bấm Ctrl+F9 - X©y dùng Test - Nhập liệu, thu kết quả, đối chứng với kết Test c Các bước tiến hành: Hoạt động giáo viên Thực chương trình đã viết trên, nhập d÷ liÖu, giíi thiÖu kÕt qu¶ - Dùng máy chiếu vật thể để minh hoạ các thao t¸c cña m×nh Hỏi: Nhóm phím dùng để thực chương tr×nh? - Yªu cÇu häc sinh nhËp d÷ liÖu vµ thùc hiÖn chương trình Giới thiệu chương trình giải phương trình Lop11.com Hoạt động học sinh Quan s¸t gi¸o viªn thùc hiÖn vµ tham kh¶o SGK Ctrl+F9 Quan s¸t yªu cÇu cña gi¸o viªn vµ (6) Gi¸o ¸n gi¶ng d¹y Bé m«n: Tin häc 11 bËc nhÊt ax+b=0 Program Vi_du; Var Begin Read(a,b); If a<>0 then Write (-b/a) Else Write('PTVN'); Readln; End - Yêu cầu học sinh tìm Test để chứng minh chương trình này sai độc lập suy nghĩ để tìm test abx 0 VSN IV cñng cè Nội dung đã học: Khởi động Turbo, soạn chương trình, dịch lỗi cú pháp, thực chương trình, tìm lỗi thuËt to¸n vµ hiÖu chØnh C©u hái vµ bµi tËp vÒ nhµ: - Viết chương trình nhập vào số và tính bình phương số đó - Viết chương trình nhập độ dài bán kính và tính chu vi diện tích hình tròn tương ứng Lop11.com (7)