IV. ĐÁNH GIÁ CUỐI BÀI 1 Nội dung đó học
SOẠN THẢO, DỊCH, THỰCHIỆN VÀ HIỆU CHỈNH CHƯƠNGTRèNH
Tiết 7
I. MỤC TIấU
1. Kiến thức
- Biết được ý nghĩa của cỏc thủ tục vào/ ra chuẩn đối với lập trỡnh - Biết được cỏc cấu trỳc chung của thủ tục vào/ ra trong NNLT Pascal - Biết được cỏc bước để hoàn chỉnh một chtrỡnh
- Biết được cỏc file cơ bản của Turbo Pascal 7.0
2. Kĩ năng
- Viết đỳng lệnh vào /ra dữ liệu
- Biết nhập đỳng dữ liệu khi thực hiện chtrỡnh.
- Biết khởi đọng và thoỏt khỏi hệ soạn thảo Turbo Pascal 7.0
- Soạn được một chtrỡnh vào mỏy. Dịch được chtrỡnh để phỏt hiện lỗi cỳ phỏp. - Thực hiện được chtrỡnh để nhập dữ liệu và thu kết quả, tỡm lỗi thuật toỏn và sửa lỗi
II. ĐỒ DÙNG DẠY HỌC
1. Giỏo viờn:
- Sgk, tranh chứa cỏc biểu thức trong toỏn, Projector, mỏy vi tớnh, một số chtrỡnh viết sẵn. - Mỏy vi tớnh cú cài phần mềm Turbo Pascal 7.0, Projector.
2. Học sinh: sgk
III. PHƯƠNG PHÁP GIẢNG DẠY:
SD phương phỏp nờu vấn đề, hướng dẫn, gợi mở
IV. HOẠT ĐỘNG DẠY HỌC
1. Hoạt động 1: Kiểm tra bài cũ
Hđ của GV Hđ của HS
Cho M, N là 2 biến nguyờn. Điều kiện xỏc định M, N đồng thời là số chẵn hoặc đồng thời là số lẻ được thể hiện trong Pascal như thế nào?
2 Hs lờn bảng trả lời bằng cỏch ghi bảng
- Gọi 2 Hs lờn bảng độc lập trả lời - Gọi Hs khỏc nhận xột (Đỳng, Sai) Nhận xột đỏnh giỏ, cho điểm
=1) and (N mod 2 = 1))
2. Hoạt động 2:
Mục tiờu: HS biết và hiểu thủ tục nhập dữ liệu vào từ bàn phớm.
Cỏc bước tiến hành:
Hđ của GV Hđ của HS
- GV nờu vấn đề: Khi giải quyết một bài toỏn, ta phải đưa dữ liệu vào mỏy tớnh xữ lớ, việc đưa dữ liệu bằng lệnh gỏn sẽ làm cho chtrỡnh chỉ cú tỏc dụng với một dữ liệu cố định. Để chương trỡnh giải quyết được nhiều bài toỏn hơn, ta phải sử dụng thủ tục nhập dữ liệu.
- GV Y/cầu Hs n/cứu Sgk cho biết cấu trỳc chung của thủ tục nhập dữ liệu trong NNLT Pascal:
- GV Ghi bảng
Vớ dụ: khi viết chtrỡnh giải ptrỡnh: Ax2 + Bx
+ C = 0, ta phải nhập vào cỏc đại lượng
nào? viết lệnh nhập?
2. Treo bảng chứa chtrỡnh Pascal đơn giản cú lệnh nhập giỏ trị cho 3 biến.
- GV Mụ phỏng kết quả ch trỡnh cho hs quan sỏt.
H?: Khi nhập giỏ trị cho nhiều biến, ta phải thực hiện như thế nào?
Vớ dụ: để nhập cỏc giỏ trị 2, -1.5, 7 cho cỏc biến A, B, C ta cú thể gừ: Cỏch1: 2 1.5 7 Enter Cỏch2: 2 1.5 Enter - HS chỳ ý nghe giảng - HS n/cứu Sgk và trả lời: Read(<biến1>,…,<biếnN>); Readln(<biến1>,…,<biếnN>); Suy nghĩ, trả lời:
- Phải nhập giỏ trị vào 3 biến A, B, C -Lệnh nhập: Readln(A,B,C); 2. Quan sỏt chtrỡnh và kết quả.
- Cỏc giỏ trị phải được cỏch nhau ớt nhất một dấu cỏch (Space) hoặc kớ tự xuống dũng (Enter).
7 Enter
H?: Lệnh Read và Readln khỏc nhau như thế nào?
- Suy nghĩ, trả lời Read: …… Readln: ……
3. Hoạt động 3
Mục tiờu: Giỳp học sinh biết và hiểu thủ tục đưa dữ liệu ra màn hỡnh.
Cỏc bước tiến hành:
Hđ của GV Hđ của HS
- GV nờu vấn đề:
Sau khi xữ lớ xong, kết quả CT được lưu trong bộ nhớ, để nhỡn thấy được kết quả ta phải dựng thủ tục xuất dữ liệu.
- GV Y/cầu hs n/cứu Sgk
- H? cho biết cấu trỳc chung của thủ tục xuất dữ liệu trong NNLT Pascal?
Vớ dụ: Khi viết CT giải pt: ax+b=0,
- H? ta phải đưa ra màn hỡnh gớa trị nghiệm -b/a, ta phải viết lệnh như thế nào?
- GV để nhập giỏ trị cho 1 biến từ bàn phớm, ta thường đưa thờm cõu dẫn dắt sau đú mới đến cõu lệnh nhập. Bằng cỏch dựng cặp thủ tục write và read.
Vớ dụ: Cần nhập 1 số nguyờn dương N (N<=100) từ bàn phớm ta viết cõu lệnh như sau:
Write(‘Nhap so nguyen duong N<=100: ’); Readln(N);
GV: Treo bảng chứa chtrỡnh Pascal đơn giản: Mụ phỏng kết quả chtrỡnh để hs quan sỏt 1. - N/cứu Sgk và trả lời. Write(ds kết quả); Writeln(ds kết quả); - HS trả lời: Writeln(-b/a); 2. Chỳ ý lắng nghe và ghi nhớ.
- HS. Quan sỏt kết quả chtrỡnh và trả lời một số cõu hỏi:
Nhap vao hai so: 5-6
H?: chức năng cõu lệnh writeln();
GV: Khi cỏc tham số trong lệnh write() thuộc kiểu Char hoặc Real thỡ qui định vị trớ như thế nào?
Vd1: với c = ‘E’ và x = 145
Vd2: n = 54 và r = 24.7
5. <<Cú thể cho hs tỡm hiểu ở nhà>>
Thủ tục Readln và Writeln khụng cú tham số cú chức năng là gỡ?
Vd: Đoạn CT cho kết quả thế nào? Writeln(‘DAY THON VI DA’); Writeln;
Writeln(‘<Han Mac Tu>’:20);
- HS trả lời:
Viết ra màn hỡnh dũng chữ và đưa con trỏ xuống dũng.
- Dành 6 vị trớ trờn màn hỡnh để viết số x, 6 vị trớ tiếp để viết số y, …
5. N/cứu sgk, suy nghĩ và trả lời:
- Readln đặt cuối chtrỡnh để tạm dừng chtrỡnh cho người dựng thấy kết quả của chtrỡnh đưa ra màn hỡnh.
- Writeln để đưa con trỏ xuống đầu dũng dưới.
4. Hoạt động 4:
Mục tiờu: Để Hs làm quen với Turbo Pascal 7.0
Cỏc bước tiến hành:
Hđ của GV Hđ của HS
- GV. ĐVĐ:
Để sử dụng được Pascal trờn mỏy phải cú
1. Tham khảo sgk và trả lời Turbo.exe Turbo.tpl ---E---145 ---54--24.700 7983.000 DAY THON VI DA --- - - - <Han Mac Tu> _
cỏc file chtrỡnh cần thiết. Y/cầu hs tham khảo Sgk và cho biết tờn cỏc file đú.
- GV giới thiệu cỏch khởi động TP:
Bấm vào biểu tượng Turbo Pascal 7.0 trờn màn hỡnh
- Giới thiệu màn hỡnh soạn thảo CT: bảng chọn, con trỏ, vựng soạn thảo, ...
Graph.tpu egavga.bgi Và cỏc file *.chr
2. Học sinh quan sỏt và ghi nhớ
5. Hoạt động 5:
Mục tiờu: Tập soạn thảo chtrỡnh vào dịch lỗi cỳ phỏp
Cỏc bước tiến hành:
Hđ của GV Hđ của HS
1. Soạn một chtrỡnh làm vớ dụ, lưu chtrỡnh, dịch lỗi.
2. Mở chtrỡnh cú sẵn, y/cầu hs chỉ cỏc lỗi cỳ phỏp trong CT, Biờn dịch lỗi và sửa.
Program vd Var x: integer; Bigen Write(‘nhap so ngduong );Readln(x); Y:= sqrt(x); Write(y); End; 1. Quan sỏt và ghi nhớ Program vd; Var x, y: integer; Begin Write(‘nhap so ngduong ‘); Readln(x); Y:= sqrt(x); Write(y); End.
