III/ Chuẩn bị:
1. Chuẩn bị của GV: Phần mềm, mỏy tớnh, chia nhúm học sinh. 2. Chuẩn bị của HS: Bài thực hành 3
IV/ Hoạt động dạy học:
1. Bài cũ: Nờu sự khỏc nhau giữa biến và hằng?
(Giỏ trị của biến cú thể thay đổi, cũn giỏ trị của hằng được giữ nguyờn trong suốt quỏ trỡnh thực hiện chương trỡnh)
2 Bài mới:
Hoạt động của GV Hoạt động của HS
Hoạt động 1: GV nờu yờu mục đớch, yờu cầu của tiết thực hành.
Bước đầu làm quen cỏch khai bỏo và sử dụng biến trong chương trỡnh.
HS lắng nghe
Hoạt động 2: 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 giới thiệu cỏc kiểu dữ liệu trong bảng và yờu cầu HS lờn bảng ghi phạm vi giỏ trị
Tờn kiểu
dữ liệu Phạmvi giỏ trị
Byte Cỏc số nguyờn từ 0 -> 255 Integer Cỏc số nguyờn từ -215 -> 215-1
Real Số thực cú giỏ trị tuyệt đối trong khoảng 2,9X10-39 đến 1,7 X 1038 và số 0
HS lờn thực hiện điền phạm vi giỏ trị vào bảng.
Var <danh sỏch biến>: <kiểu dữ
liệu>
trong đú:
- Danh sỏch biến là một hoặc nhiều biến và được cỏch nhau bởi dấu (,).
Char Cỏc ký tự trong bảng chữ cỏi String Cỏc dĩy gồm tối đa 255 ký tự ? Hĩy nờu cỳ phỏp khai bỏo biến?
kiểu dữ liệu của Pascal.
Hoạt động 3: Tỡm hiểu bài tập 1
Viết chương trỡnh Pascal cú khai bỏo và sử dụng biến.
Gv yờu cầu HS đọc bài toỏn ở SGK Em hĩy cho biết yờu cầu của bài toỏn?
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.
Gv gợi ý: Cụng thức cần tớnh
Tiền thanh toỏn = Đơn giỏ X số lượng+ phớ dịch vụ.
a) Khởi động Pascal gừ chương trỡnh sau và tỡm hiểu ý nghĩa từng cõu lệnh trong chương trỡnh Program Tinh_tien;
uses crt; Var
Soluong: integer;
Dongia, thanhtien: Real; Thongbao: String;
const phi = 10000; Begin
Clrscr;
thongbao:= ‘ tong so tien phai thanh toan:’; {Nhap don gia va so luong hang}
Write (‘don gia =’); Readln(dongia); Write (‘soluong=’); Readln(soluong); thanhtien:= soluong*dongia+phi; {in ra so tien phai tra}
Writeln(thongbao, thanhtien:10:2); Readln
end.
* Cỏc chỳ thớch đặt trong dấu ngoặc { }hoặc (**) được dựng để giải thớch cõu lệnh, ý đồ của người viết chương trỡnh. Gặp dấu ngoặc này Pascal bỏ qua, khụng dịch những nội dung bờn trong.
b) GV yờu cầu HS lưu với tờn TINHTIEN.PAS dich và chỉnh sửa cỏc lỗi gừ, nếu cú.
HS đọc bài HS trả lời HS thực hiện trờn mỏy Phần khai bỏo Nhập đơn giỏ từ bàn phớm nhập số lượng từ bàn phớm In ra thụng bỏo và tiền HS thực hiện trờn mỏy. V/ Củng cố bài:
GV yờu cầu HS nhắc lại 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, nhắc lại lệnh nhập dữ liệu từ bàn phớm.
* HS đọc phần tổng kết SGK.
Hướng dẫn về nhà: Tỡm hiểu thờm bài 1 và chuẩn bị bài 2.
Tuần :
7 Ngày soạn:
Tiết: 14 Ngày giảng:
BÀI THỰC HÀNH 3:
KHAI BÁO VÀ SỬ DỤNG BIẾN (tt)
I/ Mục tiờu:
Kiến thức:
+ Thực hiện được khai bỏo đỳng cỳ phỏp, lựa cho được kiểu dữ liệu phự hợp cho
biến.
+ Kết hợp được giữa lệnh Write, Writeln với Read, Readln để thực hiện việc nhập dữ liệu cho biến từ bàn phớm.
+ Hiểu về cỏc kiểu dữ liệu chuẩn: Kiểu số nguyờn, kiểu số thực; + Sử dụng được lệnh gỏn giỏ trị cho biến.
+ Hiểu cỏch khai bỏo và sử dụng hằng.
+ Hiểu và thực hiện được việc trỏo đổi giỏ trị của hai biến.
Kỹ năng: Viết được chương trỡnh đơn giản, khai bỏo đỳng biến, sử dụng đỳng cõu lệnh vào/ ra để nhập thụng tin từ bàn phớm hoặc đưa thụng tin ra màn hỡnh.
II/ Phương phỏp: Vấn đỏp, thảo luận, hướng dẫn trờn mỏy.III/ Chuẩn bị: III/ Chuẩn bị:
1. Chuẩn bị của GV: Phần mềm, mỏy tớnh, chia nhúm học sinh. 2. Chuẩn bị của HS: Bài thực hành 3
IV/ Hoạt động dạy học:
1. Bài cũ: 2 Bài mới:
Hoạt động của GV Hoạt động của HS
Hoạt động 1: GV yờu cầu HS mở chương trỡnh
TINHTIEN.PAS
a) Chạy chương trỡnh với cỏc bộ dữ liệu (đơn giỏ và số lượng) như sau (1000, 20), (3500, 200), (18500,123).
Kiểm tra tớnh đỳng của cỏc kết quả in ra.
b)Chạy chương trỡnh với bộ dữ liệu (1,3500). Quan sỏt kết quả nhận được.
Hĩy thử đoỏn xem tại sao chương trỡnh cho kết
HS thực hiện trờn mỏy bằng lệnh File/Open chọn tệp TINHTIEN.PAS sau đú chọn Open. HS thực hiện trờn mỏy ấn phỡm Crtl+ F9 để chạy chương trỡnh.
Với cỏc bộ dữ liệu (đơn giỏ và số lượng) như sau (1000, 20), KQ = 30000
(3500, 200), KQ = 710 000 (18500,123), KQ = 2 285 500 HS thực hiện với bộ dữ liệu (1, 3500), KQ =-20536
Nguyờn nhõn của hiện tượng này là do tràn số. Biến soluong là kiểu Integer nờn chỉ cho phộp chứa cỏc
quả sai. giỏ trị trong khoảng -32768 đến 32767, giỏ trị 35000 nằm ngồi phạm vi.
Hoạt đụng 2: Tỉm hiểu bài tập 2
GV yờu cầu HS gừ chương trỡnh nhập cỏc số nguyờn x và y, in giỏ trị của x,y ra màn hỡnh. Sau đú hoỏn đổi cỏc giỏ trị của x và y rồi in lại ra màn hỡnh giỏ trị của x và y.
Program hoan_doi; var x,y,z: integer; begin Read(x,y); Writeln(x,’ ‘,y); z:=x; x:=y; y:=z; Writeln(x,’ ‘, y); Readln; End.
Gv yờu cầu HS tỡm hiểu cỏc cõu lệnh.
a) GV yờu cầu HS chạy chương trỡnh.
Do khụng cú thụng bỏo cho người dựng về yờu cầu nhập giỏ trị tương ứng của 2 biến x, y nờn trong bài này nhập 2 số nguyờn cỏch nhau bởi dấu cỏch rồi ấn phớm Enter và quan sỏt kết quả.
* GV yờu cầu HS nhập 2 số 7 và 8 quan sỏt kết quả nhận được.
* GV yờu cầu HS cải tiến chương trỡnh trờn để hướng dẫn người dựng nhập giỏ trị cho x, y từ bàn phớm. In ra giỏ trị x, y vừa được ngươỡ dựng nhập vào và in ra màn hỡnh giỏ trị của x, y sau khi trỏo đổi giỏ trị. Cú thể tham khảo chương trỡnh TINHTIEN.PAS để thực hiện việc này.
HS thực hiờn trờn mỏy.
Khai bỏo x, y, z với kiểu dữ liệu nguyờn
Nhập x, y In ra giỏ trị x, y
Thực hiện việc trỏo đổi 2 biến x, y
In ra giỏ trị x, y
HS chạy chương trỡnh Crlt + F9
nhập 7 8 ; KQ sau khi trỏo đổi là 8 7
Chương trỡnh sau khi chỉnh sửa cú thể là:
Program hoan_doi; var x,y,z: integer; begin
Write(‘ nhap gia tri cua x=’); Readln(x);
Write(‘ nhap gia tri cua y=’); Readln(y);
Writeln(‘ truoc trao doi gia tri của x:’, x);
Writeln(‘ truoc trao doi gia tri của y:’, y);
z:=x; x:=y; y:=z;
Writeln(‘sau trao doi gia tri của x = ’, x);
Writeln(‘Sau trao doi gia tri của y = ’, y)
Readln;
End.
V/ Củng cố bài: GV yờu cầu HS nhắc lại phần tổng kết. Nhận xột tiết thực hành
Tuần :
8 Ngày soạn:
Tiết: 15 Ngày giảng:
BÀI TẬP
I/ Mục tiờu:
ễn tập lại kiến thức từ bài 1 -> bài 4.