KIỂM TRA 1 TIẾT THỰC HÀNH

- Rèn kỹ năng về đọc các chương trình đơn giản và hiểu được ý nghĩa của thuật toán sử dụng trong chương trình... Về thái độ.[r]

PHỊNG GD&ĐT - THỊ XÃ ĐƠNG TRIỀU CÔNG NGHỆ THÔNG TIN

-o0o -GIÁO ÁN LÊN LỚP

MON-HOC: - LỚP 8

KIỂM TRA TIẾT THỰC HÀNH

I MỤC TIÊU

1 Về kiến thức

- Nắm cấu trúc chương trình pascal, cách thể thuật toán câu lệnh write, readln, if then

2 Về kỹ năng

- Rèn kỹ đọc chương trình đơn giản hiểu ý nghĩa thuật toán sử dụng chương trình

3 Về thái độ

- Nghiêm túc giờ, tự giác làm

II CHUẨN BỊ CỦA GIÁO VIÊN VÀ HỌC SINH

1 Giáo viên

- Giáo viên: Giáo án, đề bài, phòng máy

2 Học sinh

- HS: học sinh chuẩn bị nhà III PHƯƠNG PHÁP

Kiểm tra thực hành máy, vấn đáp IV TIẾN TRÌNH GIỜ DẠY

1 Ổn định lớp (thời gian: phút):

2 Kiểm tra cũ:

3 Giảng mới:

NỘI DUNG THỜI GIAN

HOẠT ĐỘNG DẠY HỌC

GHI BẢNG Hoạt

động của giáo viên

Hoạt động của học sinh

Câu1: Viết chương trình giải phương trình bậc bx + c = Yêu cầu: gõ chương trình vào máy, dịch chương trình chạy chương trình với liệu khác - Lưu lại với tên tên +lớp+bài Câu 2: Cho số a, b

44 phút

G V chiế u để

H S t h ự c h i ệ

C â u : V i ế t chương trình g i ả i p h n g trình bậc Ngày soạn: 02/12/2017

Ngày giảng: 06/12/2017 Tiết thứ: 32

Viết chương trình in số có giá trị lớn Yêu cầu: gõ chương trình vào máy, dịch chương trình chạy chương trình với liệu khác - Lưu lại với tên tên +lớp+bài Đáp án: Câu 1: điểm Program

giai_bat_ptrinh; Var b,c : integer; Begin Write (‘Nhap b : ‘); Readln (b); Write (‘Nhap c: ‘); Readln ( c); If b = then If c <> then write (‘ptvn’) Else write (‘ptvsn’) Else write (‘nghiem cua pt x=’, -c/b :8:3); Readln; End Câu2: điểm Program SLN; Var b,a : integer; Begin Write (‘Nhap a, b: ‘); Readln (a, b); If a

G V c h ấ m

n m y tính

bx + c = Yêu cầu:  gõ chương trình vào máy, dịch chương trình c h y c h n g trình với  liệu khác

- Lưu lại với tên tên +lớp+bài

Câu 2: Cho số a , b   V i ế t chương trình in số có giá trị lớn

Y ê u c ầ u : g õ chương trình vào máy, dịch chương  trình chạy chương  trình với liệu khác

- Lưu lại với tên tên +lớp+bài

Đáp án: Câu 1: điểm P r o g r a m  giai_bat_ptrinh ;

         Var b,c : integer;

Begin

      W r i t e (‘Nhap b : ‘); Readln (b);       Write (‘Nhap  c: ‘); Readln ( Ngày soạn: 02/12/2017

Ngày giảng: 06/12/2017 Tiết thứ: 32

4 Củng cố:

5 Hướng dẫn tự học:

V RÚT KINH NGHIỆM

c);

         If b = then

      If c <> then write (‘ptvn’)

         Else write (‘ptvsn’)          Else write (‘nghiem cua pt x=’, -c/b :8:3); Readln;   End Câu2: điểm Program SLN;          Var b,a : integer;

Begin

      W r i t e (‘Nhap a, b: ‘); Readln (a, b);          If  a<b

t h e n  

writeln(‘gia tri lon nhat la’,b)       e l s e writeln (‘giá trị lớn là’,a)          Readln;    End

Ngày soạn: 02/12/2017

Ngày giảng: 06/12/2017 Tiết thứ: 32