Kế hoạch bài dạy môn Tin học 8 - Tiết 36: Ôn tập

ÔN TAÄP Tuần: 18 Tiết: 36 Ngày soạn: 13 / 11 / 2018 1. Mục tiêu: 1.1.Kiến thức: - Củng cố lại kiến thức đã học 1.2. Kỹ năng: - Đọc hiểu câu lệnh - Viết chương trình đơn giản 1.3. Thái độ: - Nghiêm túc ôn tập 2. Chuẩn bị của GV và HS: 2.1. Chuẩn bị của GV: - Giáo án, sách giáo khoa, bảng phụ 2.2. Chuẩn bị của HS: - Ôn lại kiến thức đã học 3. Tổ chức các hoạt động học tập: 3.1. Ổn định lớp: (1 phút) 3.2. Kiểm tra bài cũ: không thực hiện 3.3. Tiến hành bài học: Hoạt động 1: ôn tập lý thuyết (40 phút) a. Phương pháp: vấn đáp, thảo luận nhóm, diễn giảng b. Các bước của hoạt động: HÑ cuûa GV HÑ cuûa HS Noäi Dung -Gv ghi đề bài tập: 1. Vieát chöông trình Tìm giá trị lớn nhất trong 4 số a,b,c,d (a,b,c,d được nhập từ bàn phím) Yêu cầu học sinh thảo luận và viết được chương trình Program Tim_so_lon_nhat; Uses crt; Var a,b,c,d,max: integer; Begin Clrscr; Writeln(‘Tim so lon nhat trong 4 so a,b,c,d’); Write(‘nhap so a=’);readln(a); Write(‘nhap so b=’);readln(b); Wtite(‘nhap so c=’);readln(c); Write(‘nhap so d=’);readln(d); Max:=a; If b>max then max:=b; If c>max then max:=c;. If d>max then max:=d; Writeln(‘so lon nhat la’:,max:4:2); Readln; End. 2. Viết chương trình Tính ñiểm trung bình của 3 moân Toaùn, Lyù, Tin. Program dtb; Var a,b,c,dtb:real; begin Writeln (‘nhap diem mon toan’); Readln(a); Writeln (‘nhap diem mon ly’); Readln(b); Writeln (‘nhap diem mon tin’); Readln(c); Dtb := (a + b + c)/3; Writeln (‘diem trung binh cac mon la: ’, Dtb); readln End. 3. Viết chương trình nhập 1 số tự nhiên vào máy tính và ghi ra màn hình kết quả số đã nhập là 1 số chẳn hay lẽ. Yêu cầu hs thực hiện Program chan_le; Uses crt; Var n:real; Begin Clrscr; Write(‘nhap so n=’); readln(n); If (n mod 2)= 0 then write(n,‘la so chan’) Else write(n,’la so le’); Readln; End. Học sinh thực hiện Program Tim_so_lon_nhat; Uses crt; Var a,b,c,d,max: integer; Begin Clrscr; Writeln(‘Tim so lon nhat trong 4 so a,b,c,d’); Write(‘nhap so a=’);readln(a); Write(‘nhap so b=’);readln(b); Wtite(‘nhap so c=’);readln(c); Write(‘nhap so d=’);readln(d); Max:=a; If b>max then max:=b; If c>max then max:=c; If d>max then max:=d; Writeln(‘so lon nhat la’:,max:4:2); Readln; End. Học sinh thực hiện Program dtb; Var a,b,c,dtb:real; begin Writeln (‘nhap diem mon toan’); Readln(a); Writeln (‘nhap diem mon ly’); Readln(b); Writeln (‘nhap diem mon tin’); Readln(c); Dtb := (a + b + c)/3; Writeln (‘diem trung binh cac mon la: ’, Dtb); readln End. Học sinh thực hiện Program chan_le; Uses crt; Var n:real; Begin Clrscr; Write(‘nhap so n=’); readln(n); If (n mod 2)= 0 then write(n,‘la so chan’) Else write(n,’la so le’); Readln; End. Bài tập: 1. Vieát chöông trình Tìm giá trị lớn nhất trong 4 số a,b,c,d (a,b,c,d được nhập từ bàn phím) Program Tim_so_lon_nhat; Uses crt; Var a,b,c,d,max: integer; Begin Clrscr; Writeln(‘Tim so lon nhat trong 4 so a,b,c,d’); Write(‘nhap so a=’);readln(a); Write(‘nhap so b=’);readln(b); Wtite(‘nhap so c=’);readln(c); Write(‘nhap so d=’);readln(d); Max:=a; If b>max then max:=b; If c>max then max:=c; If d>max then max:=d; Writeln(‘so lon nhat la’:,max:4:2); Readln; End. 2. Viết chương trình Tính ñiểm trung bình của 3 moân Toaùn, Lyù, Tin. Program dtb; Var a,b,c,dtb:real; begin Writeln (‘nhap diem mon toan’); Readln(a); Writeln (‘nhap diem mon ly’); Readln(b); Writeln (‘nhap diem mon tin’); Readln(c); Dtb := (a + b + c)/3; Writeln (‘diem trung binh cac mon la: ’, Dtb); readln End. 3. Viết chương trình nhập 1 số tự nhiên vào máy tính và ghi ra màn hình kết quả số đã nhập là 1 số chẳn hay lẽ. Program chan_le; Uses crt; Var n:real; Begin Clrscr; Write(‘nhap so n=’); readln(n); If (n mod 2)= 0 then write(n,‘la so chan’) Else write(n,’la so le’); Readln; End. 4. Tổng kết và hướng dẫn học tập: 4.1. Tổng kết (củng cố): ( 3 phút ) - Nhấn mạnh lại trọng tâm kiến thức 4.2. Hướng dẫn học tập (dặn dò): (1 phút ) - Về nhà xem học bài thi học kì 1 Ngaøy thaùng naêm 2018 Duyeät Tổ trưởng Thạch Nhung