II. TỰ LUẬN: (5 điểm) Cõu 1 : (2 điểm)
sử dụng lệnh điều kiện if then (tiết 1)
A. Mục tiêu
- HS luyện tập sử dụng lệnh điều kiện If...then.
- Rèn luyện kĩ năng ban đầu về đọc các chơng trình đơn giản. - Hiểu đợc ý nghĩa thuật toán sử dụng trong chơng trình.
B. chuẩn bị - GV: Phòng thực hành máy vi tính, phần mềm Pascal. - HS: Bài tập thực hành. C. tiến trình dạy học 1. Tổ chức :8A: 2. KTBC: 3. Bài mới:
Hoạt động Thầy - Trò Nội dung Hoạt động 1:
- HS khởi động vào Pascal.
- HS đọc yêu cầu của bài tập 1 SGK/52. - GV hớng dẫn cho HS khai báo biến và sử dụng câu lệnh If...then dạng đầy đủ để giải quyết yêu cầu của bài tập trên.
- HS thực hiện gõ chơng trình . - GV quan sát.
- GV yêu cầu hs dịch chơng trình. - HS quan sát các lỗi trên màn hình. - GV quan sát hớng dẫn HS cách sửa lỗi. - HS chạy chơng trình.
- GV yêu cầu HS nhập 2 giá trị tơng ứng cho 2 biến đã đợc khai báo với các bộ dữ liệu (12, 53), (65, 20).
- HS quan sát kết quả nhận đợc.
- GV quan sát kết quả của các nhóm và rút ra nhận xét.
- HS lu chơng trình với tên Sap_xep.
Hoạt động 2:
- HS đọc yêu cầu của bài tập 2 SGK/53. - GV gợi ý cho HS khai báo biến và sử dụng câu lệnh If...then dạng đầy đủ.
bài 1: Viết chơng trình nhập hai số nguyên a và b khác nhau từ bàn phím và in hai số đó ra màn hình theo thứ tự không giảm. Chơng trình: Program SS_haiso; Uses crt;
Var a,b: real; Begin
CLRSCR;
Writeln(‘nhap vao hai so’); Readln(a,b);
If a < b then writeln(a,’ ‘,b) else writeln(b,’ ‘ ,a);
Readln; End.
bài 2: Viết chơng trình nhập chiều cao của hai bạn Trang và Long, in ra màn hình kết quả so sánh chiều cao của hai bạn.
- HS thực hiện gõ chơng trình. - GV quan sát.
- HS tiến hành dịch chơng trình và quan sát các lỗi xuất hiện trên màn hình.
- GV quan sát các nhóm và hớng dẫn HS cách sửa lỗi.
- HS chạy chơng trình.
- GV yêu cầu HS nhập 2 giá trị tơng ứng cho 2 biến đã đợc khai báo với các bộ dữ liệu (1.5, 1.6), (1.6, 1.5), (1.6, 1.6) để kiểm nghiệm kết quả.
- HS quan sát kết quả nhận đợc.
- GV quan sát kết quả của các nhóm và rút ra nhận xét.
- HS lu chơng trình với tên Aicaohon. - Thoát TP.
- Thoát máy.
Program Ai_cao_hon; Uses crt;
Var Long, Trang: real; Begin
CLRSCR;
Write (‘nhap vao chieu cao cua hai ban’); Readln(a,b);
If Long > Trang then writeln(‘Long cao hon’)
Else If Long < Trang then writeln(‘Trang cao hon’)
Else writeln(‘Hai ban cao bang nhau’); Readln;
End.
4. củng cố
- HS nhắc lại 2 câu lệnh điều kiện của cấu trúc rẽ nhánh.
- GV lu ý cho HS tuỳ các trờng hợp khác nhau mà sử dụng các câu lệnh khác nhau và lu ý thêm cho HS khi khai báo biến cần chú ý đến yêu cầu của bài toán để khai báo kiểu dữ liệu phù hợp cho biến..
5. h
ớng dẫn về nhà
- Học bài cũ.
- Làm bài tập 3 SGK/54 bài thực hành 4. - Chuẩn bị tiết sau thực hành.
Ngày soạn:8/12
Ngày giảng:15/12