bai 18 lop 12

BI 18 V D V CCH VIT V S DNG CHNG TRèNH CON (Tit 2) Kiểm tra cũ Câu 1) Trình bày cấu trúc chung thủ tục? Hãy thành phần chúng thủ tục sau: Procedure Hoan_doi(var x, y: integer); Var t: integer; Begin t := x; x := y; y := t; End; Trả lời câu 1: phn u Cu trỳc ca th tc: Procedure [()]; [] phn thõn Begin [] end; Procedure Hoan_doi(x:integer,var y:integer); Var t: integer; phn khai bỏo Begin t := x; phn u x := y; phn thõn y := t; End; Câu 2) Phân biệt tham số giá trị (tham trị) tham số biến (tham biến) CTC? Cho biết kết chư ơng trình sau: Tham tr Tham bin Program Vidu; Var a, b: integer; Procedure Hoan_doi(x: integer, var y: integer); Var t: integer; Tr li cõu 2: Begin t := x; * Phõn bit tham tr v tham bin: x := y; Tham tr Tham bin y := t; - Khi th tc - Khi th tc End; thỡ giỏ tr khụng thay thỡ giỏ tr s b thay Begin i i a:=5; Khi khai bỏo cú t - Khi khai bỏo khụng b:=7; cú t khúa Var khúa Var Hoan_doi(a, b); Write(a, , b); * Kt qu chng trỡnh in mn hỡnh: End 55 Bài 18 (TIếT 41) Ví Dụ Về CáCH VIếT Và Sử DụNG CHƯƠNG TRìNH CON 1) Cách viết sử dụng thủ tục: 2) Cách viết sử dụng hàm: * Điểm khác thủ tục hàm việc thực hàm trả giá trị kết thuộc kiểu liệu xác định giá trị gán cho tên hàm * Cấu trúc hàm: Function [ () ] : ; [ ] Begin [ ] := ; End; So sánh cấu trúc Thủ tục Hàm Thủ tục Procedure < tên th tc > [ () ] ; [ < phần khai báo > ] Begin [ < dãy lệnh > ] End; Hàm Function [ (< DS tham s> ) ] : ; [ < phần khai báo > ] Begin [ ] < tên hàm > := < biểu thức > ; End; Ví dụ 1: Xét chương trình thực việc rút gọn phân số, có sử dụng hàm tính ước số chung lớn (UCLN) hai số nguyên Giải thuật tìm USCLN hai số nguyên a b: Phân tích: B1) Lặp b Muốn rút gọn phân số a/b, thực hiện: Phần đầu hàm: B2) Tìm số dư hai a b - Tử số a chia nguyên số cho USCLN ( a, b ) Function UCLN(a, b: ainteger) : integer; B3) Gán giá trị b cho - Mẫu số b chia nguyên cho USCLN ( a, b ) B4) số dư cho b - In Gán Phân số hình B5) Kết thúc vòng lặp B6) Gán giá trị a (UCLN) cho tên hàm B7) Kết thúc hàm Bin ton cc Bin cc b Hm tớnh USCLN ca s nguyờn a v b Lnh gi hm Sử dụng hàm: -Tương tự việc sử dụng thủ tục (Procedure), tức bao gồm: tên hàm tham số thực tương ứng với tham số hình thức - Lệnh gọi hàm tham gia vào biểu thức toán hạng chí tham số lời gọi hàm, thủ tục khác VD: Trong vớ d trờn, ta cú th gi hm nh sau: S := + UCLN (tu, mau) * 5; Ví dụ 2: Tìm số nhỏ ba số nguyên nhập từ bàn phím, có sử dụng hàm tìm số nhỏ hai số Giải thuật tìm số nhỏ hai số a b: - Nếu a > b số nhỏ b - Ngược lại (a ... t khúa Var khúa Var Hoan_doi(a, b); Write(a, , b); * Kt qu chng trỡnh in mn hỡnh: End 55 Bài 18 (TIếT 41) Ví Dụ Về CáCH VIếT Và Sử DụNG CHƯƠNG TRìNH CON 1) Cách viết sử dụng thủ tục: 2) Cách