+ Vấn đỏp + Thuyết trỡnh + Sử dụng cõu hỏi mở
+ Sỏch giỏo khoa + Giỏo ỏn + Sỏch bài tập
III. NỘI DUNG
NỘI DUNG HĐ CỦA GV AND HS
+ Hỏi bài cũ
Em hóy nờu cấu trỳc của chương trỡnh con ở hai dạng hàm và thủ tục
Bài 1: Viết chương trỡnh bằng thủ tục kiểm tra xem ba số nguyờn dương a, b, c cú tạo thành tam giỏc khụng? Chương trỡnh Program Tam_giac; Var a, b, c: Integer; Procedure KT(a,b,c:Integer); Begin If(a>0)and(b>0)and(c>0)and(a+b>c) and(b+c>a)and(c+a>b) then
Write(‘Tao thanh tam giac’)
GV: nờu cõu hỏi
HS: Lờn bảng trả lời cõu hỏi
GV: Nhận xột đỏnh giỏ và cho điểm GV: Nờu nội dung tiết chữa bài tập
GV: Hướng dẫn phương phỏp và gọi HS lờn bảng làm bài
Giỏo ỏn Tin học 11 Trường THPT Lờ Trực
Else
Write(‘Khong tao thanh tam giac’); End;
Begin
Write(‘Nhap 3 canh cua tam giac:=’); Readln(a,b,c);
Write(‘3 canh’,KT(a,b,c)); Readln
End.
NỘI DUNG HĐ CỦA GV AND HS
Bài 2: Viết CT bằng hàm tớnh diện tớch tam giỏc khi biết độ dài chiều cao và cạnh đỏy Program Tam_giac; Var a,h:Integer; Function DT(a,h:Integer):Integer; Begin DT:=a*h/2; End; Begin Write(‘Nhap a,h:=’); Readln(a,h); Write(‘DT:=’,DT(a,h)); Readln End.
Bài tập 3: Viết chương trỡnh kiển tra một số nguyờn dương a cú phải là số nguyờn tố hay khụng? Chương trỡnh Program Nguyen_to; Var a: Integer; Procedure nt(a:integer); Var kt:Boolean; i:Integer; Begin Kt:=False;
While(a mod i<>0) and (i<struc(sqrt(a)) do i:=i+1
If i>struc(sqrt(a)) then kt:=true;
If kt then
Write(‘a la so nguyen to’); End; Begin Write(‘nhap a:=’); Readln(a); nt(a); Readln End.
GV: Túm tắt bài toỏn và gọi HS lờn bảng làm bài
HS: Lờn bảng làm bài
GV: Túm tắt bài toỏn và nờu phương phỏp giải.
GV: Gọi HS lờn bảng làm bài. HS: Lờn bảng làm bài
IV. CỦNG CỐ (adsbygoogle = window.adsbygoogle || []).push({});
Tuần dạy: 35 Ngày soạn : 20/04/2014
Tiết PPCT : 47 Ngày dạy : 22/04/2014
THỰC HÀNH 6 (T1)I. Mục tiờu: I. Mục tiờu:
- Làm được cỏc bài tập về chương trỡnh con
1. Kiến thức:
- Củng cố lại kiến thức về xõu kớ tự, chương trỡnh con
2. Kĩ năng:
- Rốn luyện kỹ năng xử lớ xõu bằng việc tạo hiệu ứng chữ chạy trờn màn hỡnh. - Nõng cao kĩ năng viết và sử dụng chương trỡnh con.
3. Thỏi độ:
- Tự giỏc, tớch cực và chủ động trong thực hành.