- Ví dụ: Giải phương trình bậc 2 (PTBH) ax2+bx+c=0 (a≠0)
2. Câu lệnh If-then
*) Dạng thiếu:
If <Điều kiện>Then <Câu lệnh>;
*) Dạng đủ:
If <Điều kiện> Then <Câu lệnh 1> Else <Câu lệnh 2>;
Trong đó:
- Điều kiện là một biểu thức logic hoặc quan hệ
- Nghe giảng, ghi bài. - Giới thiệu cấu trúc rẽ nhánh trong Pascal: Pascal dùng câu lệnh If-then để mô tả việc rẽ nhánh tương ứng với 2 mệnh đề rẽ nhánh như sau:
- Câu lệnh, câu lệnh 1, câu lệnh 2 là các câu lệnh
trong Pascal
*) Ý nghĩa câu lệnh
- Dạng thiếu:
Nếu điều kiến đúng thì thực hiện câu lệnh, điều kiện sai thì không làm gì cả.
- Dạng đủ:
Nếu điều kiến đúng thì thực hiện câu lệnh 1, điều kiện sai thì thực hiện câu lệnh 2.
* Ví dụ 1: Kiểm tra số nguyên dương N là chẵn hay không?
* Ví dụ 2: Giải PTBH
* Ví dụ 3: Tìm số lớn nhất trong hai số A, B * Chú ý:
- Sau End phải là dấu ‘;’, trước Else không có dấu ‘;’ - Từ nay khi nói đến câu lệnh thì đó có thể là câu lệnh đơn hay câu lệnh ghép.
- Tuỳ theo từng trường hợp, từng bài toán cụ thể mà sử dụng dạng nào là phù hợp - Nghe và ghi bài
- Kiểm tra số đó có chia hết cho 2 không
- Dùng phép toán mod - Nghe và ghi bài
- Đưa ra ý nghĩa câu lệnh
- Hỏi: Với 2 cấu trúc trên thì sử dụng cấu trúc nào là thuận tiện hơn?
- Lưu ý: Sau câu lệnh trước Else không có dấu ‘;’
- GV đưa ra một số ví dụ
+ Hỏi: Để kiểm tra số nguyên là chẵn? Dùng phép toán nào để kiểm tra?
+ Viết câu lệnh, giải thích
If (N mod 2 = 0) Then Writeln(‘N chan’);
If >=0 then Writeln(‘PT co△ nghiem’)
Else Writeln(‘PT vo nghiem’); Cách 1: Max:=A;
If B > Max Then Max := B; Cách 2:
If A > B Then Max := A Else Max := B;
*/ Hoạt động 4: Câu lệnh ghép.
1. Mục tiêu: HS biết câu lệnh ghép trong pascal 2. Phương pháp, kĩ thuật: Thảo luận, vấn đáp. 3. Hình thức tổ chức hoạt động: Cá nhân, nhóm
4. Phương tiện dạy học: KHBD, máy tính, máy chiếu. 5. Sản phẩm: HS lấy được ví dụ về câu lệnh If...then...else. Nội dung hoạt động
NỘI DUNG HOẠT ĐỘNG CỦA TRÒ HOẠT ĐỘNG CỦA THẦY
3. Câu lệnh ghép
- Câu lệnh ghép có dạng Begin
<Các câu lệnh;> End;
- Nghe giảng, thảo luận để trả lời - Chú ý nghe và ghi bài
- Hỏi: Nếu sau Then ta muốn thực hiện nhiều lệnh thì làm thế nào?
- Ví dụ:
If Delta < 0 Then Writeln(‘PT vo nghiem’) Else Begin X1 := (- b – Sqrt(Delta)) / (2*a); X2 := (- b + Sqrt(Delta)) / (2*a); Writeln(‘X1 = ’, X1:6:2,’ X2 = ’, x2:6:2); End; - Ghi chép - Viết câu lệnh ghép
If Delta >= 0 Then Else Begin X1 := (- b – Sqrt(Delta)) / (2*a); X2 := (- b + Sqrt(Delta)) / (2*a); Writeln(‘X1 = ’, X1:6:2,’ X2 = ’, x2:6:2); End;
Else Writeln(‘PT vo nghiem’) - Chú ý
- Thực hiện theo yêu cầu
- Giới thiệu câu lệnh ghép trong ngôn ngữ lập trình Pascal
- Đưa ra ví dụ
- Gọi học sinh viết câu lệnh ghép dưới các thể hiện khác
- GV giải thích lỗi sai của học sinh Câu lệnh trước else
- GV chuẩn bị trước chương trình, có một số lỗi sai, yêu cầu HS phát hiện và sửa.
C. CỦNG CỐ
- Nhắc lại các kiến thức đã học: + Cấu trúc rẽ nhánh và câu lệnh rẽ nhánh dạng thiếu và đủ
+ Câu lệnh ghép
D. HƯỚNG DẪN TỰ HỌC Ở NHÀ
- Làm bài tập 4 trang 51 SGK, bài tập trong SBT - Đọc trước nội dung tiếp theo của bài 9.
V. RÚT KINH NGHIỆM.
BGH kí duyệt
Ngày 25 tháng 10 năm ...
TTCM ký duyệt
Tiết theo PPCT: 12 Ngày soạn : 30/10/... Ngày giảng: / 11/... ---★★★---