1.Ổn định tổ chức:
- Kiểm tra sĩ số: 1’
2. Kiểm tra bái cũ:
- Kết hợp trong giờ thực hành.
3. Bài mới:
HOẠT ĐỘNG CỦA THẦY + TRÒ NỘI DUNG
Hoạt động1: Chạy chương trình (25’) - GV cho HS hoạt động nhóm tìm hiểu các kiểu dữ liệu trong Pascal và cách khai báo biến với các kiểu dữ liệu.
- GV gợi ý hướng dẫn cho HS sử dụng công thức để viết chương trình.
- HS gõ chương trình vào máy tính và nêu ý nghĩa của từng câu lệnh trong chương trình.
- HS lưu chương trình với tên TINHTIEN.PAS.
- 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 và hướng dẫn HS cách sửa lỗi.
- HS chạy chương trình.
- GV yêu cầu các nhóm chạy chương trình với bộ dữ liệu (đơn giá và số lượng) lần lượt là (1000, 20), (3500, 200), (18500, 132).
- HS quan sát kết quả nhận được trên màn hình và rút ra nhận xét.
Bài tập 1: Một cửa hàng cung cấp dịch vụ bán hàng thanh toán tại nhà. Khách hàng chỉ cần đăng ký số lượng mặt hàng cần mua, nhân viên cửa hàng sẽ trả hàng và nhận tiền thanh toán tại nhà khách hàng. Ngoài giá trị hàng hoá, khách hàng còn phải trả thêm phí dịch vụ. Hãy viết chương trình Pascal để tính tiền thanh toán trong trường hợp khách hàng chỉ mua một mặt hàng duy nhất.
Chương trình:
Program Tinh_Tien; Uses CRT;
Var soluong: Interger; dongia, thanhtien: Real; thongbao: String;
Const phi = 10000; BEGIN
CLRSCR;
thong bao:=’Tong so tien phai tra’; Writeln(‘Don gia = ‘);
- HS tiếp tục chạy lại chương trình với bộ dữ liệu (1, 35000).
Readln(dongia);
Writeln(‘So luong = ‘); Readln(soluong);
thanhtien:= soluong * dongia + phi; Writeln(‘thongbao, thanhtien:10:2); Readln;
END.
Hoạt động 2: Kiểm tra kết quả (10’) GV: Quan sát kết quả nhận được và nêu lí do tại sao chương trình cho kết quả sai.
- GV nhận xét các nhóm và đưa ra đáp án đúng.
- HS thoát máy.
4. Củng cố: 5’
- GV cho HS hoạt động nhóm thảo luận trả lời các câu hỏi sau: - Hãy chọn đáp án đúng trong các câu dưới đây:
a) Để có thể sử dụng được biến và hằng trong chương trình, ta phải khai báo chúng trong phần khai báo.
b) Ta chỉ cần khai báo tên biến mà không cần khai báo kiểu dữ liệu, chương trình sẽ tự động xác định kiểu dữ liệu mà biến có thể lưu trữ.
c) Để khai báo một biến, ta cần khai báo cả tên biến và kiểu dữ liệu mà biến đó có thể lưu trữ.
5. Hướng dẫn về nhà: 4’
? Viết chương trình nhập vào 3 số và in ra màn hình tổng của 3 số đó. - Chuẩn bị tiết sau thực hành.
Ngày soạn: Ngày giảng:
Tuần 10 – Tiết 20
BÀI THỰC HÀNH 3: KHAI BÁO VÀ SỬ DỤNG BIẾN (TIẾT 2)
I. MỤC TIÊU:1. Kiến thức: 1. Kiến thức:
- HS hiểu cách khai báo và sử dụng biến. - Hiểu được việc tráo đổi giá trị của 2 biến.
- Thực hiện được việc tráo đổi giá trị của 2 biến. - Nhập chương trình.
- Dịch, sửa lỗi trong chương trình, chạy chương trình và xem kết quả.
3. Thái độ:
- Học tập nghiêm túc.
II. 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.
III. TIẾN TRÌNH LÊN LỚP.1. Ổn định tổ chức: 1. Ổn định tổ chức:
- Kiểm tra sĩ số: 1’
2. Kiểm tra bái cũ:
- Kết hợp trong giờ thực hành.
3. Bài mới:
HOẠT ĐỘNG CỦA THẦY + TRÒ NỘI DUNG
Hoạt động1: Chạy chương trình (15’) - Muốn hoán đổi lượng nước ở 2 cốc nước ta làm như thế nào?
-HS: Phải có thêm cốc nước thứ 3
- Giả sử có cốc nước thứ 3 goi là cốc trung gian. Ta sẽ hoán đổi lượng nước ở cốc thứ nhất với cốc trung gian, hoán đổi lượng nước ở cốc thứ 2 với cốc thứ nhất và hoán đổi lượng nước ở cốc trung gian với cốc thứ 2 ta sẽ có công thức:
tg:=x; x:=y; y:=tg;
Bài toán này em phải khai báo bao nhiêu biến? hãy khai báo các biến? HS: Khai báo 3 biến
Var x, y, z: Integer;
- Để nhập x, y ta sử dụng lệnh nào? HS: Readln(x);
Readln(y); Hoặc Read(x,y);
- HS hoạt động nhóm thảo luận viết chương trình cho bài toán.
Bài tập 2: Viết chương trình nhập các số nguyên x và y, in giá trị của x và y ra màn hình. Sau đó hoán đổi giá trị của xa và y rồi in lại ra màn hình giá trị của x và y.
Chương trình:
Program Hoan_doi; Uses CRT;
Var x,y,z: Interger; BEGIN CLRSCR; Writeln(‘Nhap x = ‘); Readln(x); Writeln(‘Nhap y = ‘); Readln(y);
Writeln(‘Truoc trao doi, gia tri cua x la’,x);
Writeln(‘Truoc trao doi, gia tri cua y la’,y);
z:=x; x:=y; y:=z;
Writeln(‘Sau trao doi, gia tri cua x la’,x);
Writeln(‘Sau trao doi, gia tri cua y
- HS khởi động vào Turbo Pascal.
- GV gợi ý thêm cho HS sử dụng biến trung gian để thực hiện giải quyết yêu cầu của bài toán trên bằng cách thêm vào 1 biến trong chương trình.
- HS tiến hành gõ chương trình vào máy tính.
- GV quan sát, gợi ý.
- HS các nhóm tiến hành dịch chương trình.
- HS quan sát các lỗi xuất hiện trên màn hình.
- GV gợi ý, hướng dẫn HS cách sửa lỗi. - HS tiến hành chạy chương trình.
- GV yêu cầu các nhóm nhập giá trị vào cho 2 biến x và y.
- HS quan sát kết quả nhận được trên màn hình và rút ra nhận xét.
la’,y); Readln; END.
Hoạt động2: Kiểm tra kết quả (15’) - GV nhận xét các nhóm.
- HS thoát TP. - Thoát máy.
4. Củng cố:
- HS nhắc lại cấu trúc khai báo biến, hằng.
5. Hướng dẫn về nhà:
Ngày soạn: Ngày giảng:
Tuần 11 – Tiết 21
KIỂM TRA 1 TIẾTI. MỤC TIÊU I. MỤC TIÊU
- Đánh giá kiến thức, kĩ năng của HS về: Ngôn ngữ lập trình, cấu trúc chung của chương trình, cách đặt tên trong chương trình, các phép toán được dùng trong Pascal, các lệnh cơ bản của ngôn ngữ lập trình Pascal.