II. Thao tỏc với tệp
2. Cỏch viết và sử dụng hàm
- Hàm luụn trả về giỏ trị thụng qua tờn hàm
- Hàm cú cấu trỳc tương tự như như thủ tục, tuy nhiờn cú khỏc nhau phần đầu như sau:
Function <Tờnhàm>(<DS tham số>):<Kiểu
DL>;
- Trong chương trỡnh con cần những khai bỏo nào
- Cỏch tớnh luỹ thừa của một số
- Chương trỡnh con tớnh ước chung lớn nhất của hai số, cần khai bỏo những biến nào
- Sử dụng hàm nào để tớnh số dư của hai số
- Chương trỡnh chớnh cú lời gọi như thế nào
- Cú cần lấy tử số và mẫu số chia cho UCLN của hai số khụng
- Cỏch tỡm số lớn nhất của hai số như thế nào
Var a, b, c, d:Real; m, n, p, q :Integerl TLT: Real;
FunctionLT(Var x: Real; Var k: Integer): Real;
Var Tich :Real; j: Integerl Begin Tich:=1; For j:= 1 to k do Tich:=Tich*x; End; Begin
Write(‘Nhap cac so: a, b, c, d, m, n, p ,q); Readln(a, b, c, d, m, n, p, q);
LT:=LT(a,m)+LT(b,n)+LT(c,p)+LT(d,q); Writeln(‘Tong luy thua:’,TLT:9:4); Readln;
End.
*) Viết chương trỡnh rỳt gọn phõn số, trong đú cú sử dụng hàm tớnh UCLN của hai số nguyờn
Program Rutgonphanso;
Var TS, MS, a:Integer;
Function UCLN(x,y: Integer): Integer; Var du : Intege; Begin While y<>0 do Begin du:=x mod y; x:=y; y:=du; End; UCLN:=x; End; Begin
Write(‘Nhap tu so: ‘); Readln(TS); Write(‘Nhap mau so: ‘); Readln(MS); a:=UCLN(TS,MS); If a>1 then Begin TS:=TS div a; MS:=MS div a; End; Writeln(TS:8,’ ‘,MS:8); Readln; End.
Bước 2: HS trả lời cõu hỏi Bước 3: GV chuẩn lại kiến thức
*) Tỡm giỏ trị nhỏ nhất trong ba số, ba số nhập từ bàn phớm trong đú cú sử dụng hàm tỡnh số nhỏ nhất trong hai số
Program Sonhonhat;
Var a, b, c :Real;
Function Min(x,y: Real): Real; Begin
If a<b then Min:=a Else Min:=b; End;
Begin
Write(‘Nhap so a: ‘); Readln(a); Write(‘Nhap so b: ‘); Readln(b); Write(‘Nhap so c: ‘); Readln(c);
Writeln(‘So nho nhat: ,’Min(Min(a,b),c); Readln;
End.
3. Củng cố, Luyện tập: (3’)
- Nhắc nhở lại kiến thức cơ bản của bài học về cỏch sử dụng sử dụng hàm 4. Vận dụng mở rộng: (2’)
- Về nhà học bài và làm bài tập ở nhà. - Xem trước phần cũn lại của bài
Lớp Ngày dạy Sĩ số Học sinh vắng B8 …../…../ 2020 .../… B9 …../…../ 2020 .../… Tiết 44: BÀI TẬP VÀ THỰC HÀNH 6 I. MỤC TIấU 1. Kiến thức:
- Biết cỏch sử dụng hàm và thủ tục trong chương trỡnh
- Biết cỏch sử dụng hàm để thực hiện cỏc chương trỡnh về xõu kớ tự 2. Kỹ năng
- Rốn luyện cỏc kĩ năng xử lớ xõu
- Nõng cao kĩ năng viết và sử dụng chương trỡnh con 3. Thỏi độ
- Ham thớch mụn học, cú tớnh kỉ luật cao và tinh thần làm việc theo nhúm 4. Phỏt triển năng lực
Giỳp học sinh khỏm phỏ, tự học, năng lực hợp tỏc trong thực hành, năng lực lập trỡnh về chương trỡnh con.
II. CHUẨN BỊ CỦA GV VÀ HS
1`. Chuẩn bị của GV:
- Giỏo ỏn, phấn, bảng, Phũng thực hành 2. Chuẩn bị của HS:
- Sỏch giỏo khoa, vở ghi
III. HOẠT ĐỘNG DẠY HỌC
1. Hoạt động khởi động Mục tiờu:
- Giỳp học sinh huy động kiến thức và kĩ năng để tổng hợp cỏc kiến thức về thủ tục trong chương trỡnh con của lập trỡnh.
- Giỏo viờn quan sỏt học sinh, hướng dẫn học sinh thực hành về chương trỡnh con
Tiến hành:
- Hướng dẫn viết về chương trỡnh con trong Pascal.
- Giỏo viờn kết luận về hoạt động của học sinh và vào bài mới. 2. Bài mới:
Hoạt động của GV và HS Nội dung chớnh
HĐ1: Biết cỏch viết và sử dụng thủ