Bµi 18 Ví dụ 1: Lập chơng trình vẽ các hình chữ nhật bằng dấu * có kích thớc khác nhau. Ví dụ 1: Lập chơng trình vẽ các hình chữ nhật bằng dấu * có kích thớc khác nhau. ể viết chơng trình cho ví dụ trên ta nên dùng loại chơng trình con nào? Cách2: Dùng chơng trình con thủ tục Ve_HCN(dai,rong) để vẽ một hình chữ nhật. Trong chơng trình chính, dùng lời gọi thủ tục và truyền các tham số với giá trị khác nhau để vẽ các hình chữ nhật khác. Ví dụ: Ve_HCN(25,20); Ve_HCN(3,7) Cách 1: Sử dụng nhiều lần các câu lệnh: Writeln(* * * * * * *); Writeln(* *); Writeln(* * * * * * *); 1. Cách viết và sử dụng thủ tục: CÊu tróc cña thñ tôc: Procedure <tªn thñ tôc> [(<ds tham sè>)]; [< PhÇn khai b¸o >] Begin [<D·y c¸c lÖnh>] End; C¸c em h·y viÕt mét thñ tôc Ve_HCN b»ng dÊu * víi chiÒu dµi, réng bÊt k×! ********************************** * * * * * * ********************************** Dµi Réng  VÏ c¹nh trªn cña HCN  VÏ hai c¹nh bªn  VÏ c¹nh díi FOR i:=1 to chdai DO WRITE( * ); WRITELN;‘ ’ FOR J:=1 to chrong -2 DO Begin Write( * );‘ ’ For i:=1 to chdai - 2 do Write( );‘ ‘ Writeln( * )‘ ’ end; FOR i:=1 to chdai DO WRITE( * ); WRITELN;‘ ’ Program VD; Uses crt; var a,b: byte; Procedure Ve_HCN( chdai,chrong:integer); Var i,j: integer; Begin For i:=1 to chdai do write(‘ * ’); Writeln; For j:=1 to chrong-2 do begin write(‘ * ’); for i:=1 to chdai-2 do write(‘ ‘); writeln(‘ * ’); end; For i:=1 to chdai Do write(‘ * ’); writeln; end; BEGIN CLRSCR; Ve_HCN(25,10); Writeln; a:=5 ; b:=10; Ve_HCN(a,b); readln; END. BiÕn côc bé Tham sè thùc sù (tham trÞ) Tham sè h×nh thøc BiÕn toµn côc * Tham số và cách truyền tham số: - Các tham số hình thức được thay bằng các tham số thực sự tương ứng là các giá trị cụ thể được gọi là tham số giá trị (gọi tắt là tham trị). Tham số biến - Khai báo sau từ khóa VAR trong danh sách tham số - Giá trị của biến có thể bị thay đổi sau khi thực hiện xong thủ tục. Tham số giá trị -Không khai báo sau từ khóa VAR - Giá trị tham biến không thay đổi khi thực hiện xong thủ tục. - Các tham số hình thức được thay bằng các tham số thực sự tương ứng là tên các biến chứa dữ liệu ra được gọi là tham số biến (gọi tắt là tham biến). * Phân biệt tham số biến và tham số giá trị Program VD; Uses crt; var a,b: integer; Procedure Hoan_doi(Var x,y:integer); Var TG: integer; Begin TG:= x; x:= y; y:=TG; end; BEGIN CLRSCR; a:= 5 ; b:= 10; Writeln( a:6 , b:6); Hoan_doi(a,b); Writeln( a:6 , b:6); readln; END. BiÕn côc bé Tham sè thùc sù Tham sè biÕn BiÕn toµn côc 2. C¸ch viÕt vµ sö dông hµm: Lưu ý khi sử dụng hàm:  Kết quả trả về qua tên hàm chỉ có thể thuộc các kiểu dữ liệu: integer, real, boolean, char, string.  Lệnh gọi hàm có thể tham gia vào biểu thức như một toán hạng và thậm chí là tham số của lời gọi hàm, thủ tục khác. Biến đợc khai báo ở trong CTC chỉ có tác dụng trong CTC gọi là biến cục bộ. Biến khai báo ở CT chính có tác dụng ở mọi chơng trình gọi là biến toàn cục. Biến đợc khai báo cho dữ liệu vào/ra ở CTC gọi là tham số hình thức. Biến chứa trong lời gọi CTC ở chơng trình chính là tham số thực sự. VD: Lập chơng trình tối giản phân số VD: Lập chơng trình tối giản phân số Ví dụ: nhập 6/10 => ra 3/5 * INPUT : Nhập phân số a/b; * OUTPUT : Phân số c/d - Trong đó: c = a/ƯCLN(a,b); d = b/ƯCLN(a,b); Viết chơng trình con thực hiện tìm ƯCLN(a,b) và gọi nó khi tính c,d trong chơng trình chính. [...]... Phan so toi gian = , c, / , d); END Readln; 6 10 Hóy Nh! Biến: - Khai báo trong chương trình chính là biến toàn cục - Khai báo trong chương trình con là biến cục bộ Tham số - Biến khai báo cho dữ liệu vào ra trong chương trình con gọi là tham số hình thức - Biến chứa trong lời gọi CTC ở chương trình chính là các tham số thực sự ... := a-b else b:=b-a; USCLN=2; a; USCLN=2; UCLN := end; BEGIN BEGIN Write( Nhap vao tu so so và mau Readln(tu,mau); Write( Nhap vao tu va mau so:); so: ); readln(tu,mau); C := 6 div UCLN(6,10) d := 10 div UCLN(6,10); C := tu div UCLN(tu,mau) ; Writeln( Phan so toi gian = , 3, / , 5); d := mau Readln; div UCLN(tu,mau); Writeln( Phan so toi gian = , c, / , d); END Readln; 6 10 Hóy Nh! Biến: - Khai . hình chữ nhật khác. Ví dụ: Ve_HCN(25,20); Ve_HCN(3,7) Cách 1: Sử dụng nhiều lần các câu lệnh: Writeln(* * * * * * *); Writeln(* *); Writeln(* * * * * * *); 1. Cách viết và sử dụng thủ tục: CÊu. ở trong CTC chỉ có tác dụng trong CTC gọi là biến cục bộ. Biến khai báo ở CT chính có tác dụng ở mọi chơng trình gọi là biến toàn cục. Biến đợc khai báo cho dữ liệu vào/ra ở CTC gọi là. ý khi sử dụng hàm:  Kết quả trả về qua tên hàm chỉ có thể thuộc các kiểu dữ liệu: integer, real, boolean, char, string.  Lệnh gọi hàm có thể tham gia vào biểu thức như một toán hạng và thậm