Bài 18. Ví dụ về cách viết và sử dụng chương trình con

TẬP THỂ LỚP 11A1 KÍNH CHÀO
QUÝ THẦY, CÔ ĐẾN DỰ GIỜ!
1. Cách viết và sử dụng thủ tục
2. Cách viết và sử dụng hàm
Xét ví dụ vẽ hình chữ nhật có dạng sau
Ta có thể vẽ hình chữ nhật trên với ba câu lệnh
Writeln(‘* * * * * * *’);
Writeln(‘* *’);
Writeln(‘* * * * * * *’);
1. Cách viết và sử dụng thủ tục
Program VD_thutuc1;
procedure Ve_hcn; {Bat dau chuong trinh con}
Begin
end; {Ket thuc chuong trinh con}
writeln(‘* * * * * * *’);
writeln(‘* *’);
writeln(‘* * * * * * *’);
begin
Ve_Hcn; {Goi thu tuc Ve_Hcn}
writeln; writeln; {de cach hai dong}
Ve_Hcn;
writeln; writeln;
Ve_Hcn;
end.
{****************************************}
{****************************************}
Cấu trúc chương trình chính:
[]

?: Vị trí của thủ tục nằm ở phần nào của chương trình chính?
1. Cách viết và sử dụng thủ tục
Procedure [()];
[]
Begin
End;
[]
Chú ý:
- Sau tên dành riêng end kết thúc chương trình chính là dấu (.), còn sau end kết thúc thủ tục là dấu chấm phẩy (;)
- Các thủ tục, nếu có, phải được khai báo và mô tả trong phần khai báo của chương trình chính, ngay sau phần khai báo biến.
- Khi cần thực hiện, ta phải viết lệnh gọi thủ tục tương tự như các thủ tục chuẩn.
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
* * * * * * … *
* * * * * * … *
*
*
Chrong
Chdai
Viết chương trình mô tả đầy đủ thủ tục Ve_Hcn với tham số chdai, chrong và sử dụng thủ tục này để vẽ các hình chữ nhật có kích thước khác nhau
Chrong - 2
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
b. Ví dụ về thủ tục
Program VD_thutuc2;
uses crt;
Var a, b, i: integer;
procedure Ve_Hcn(chdai, chrong: integer);
Var i, j: integer;
begin
end;
For i:= 1 to chdai do write(‘*’);
writeln;
For i:=1 to chrong – 2 do
begin
end;
write(‘*’);
For j:=1 to chrong –2 do write(‘ ’);
writeln(‘*’);
begin
clrscr;
Ve_Hcn(25,10);
writeln; writeln;
Ve_Hcn(5,10);
readln;
clrscr;
a:= 4; b:=2;
For i:=1 to 4 do
begin
end;
Ve_Hcn(a,b);
readln; clrscr;
a:= a*2; b:= b*2;
readln;
End.
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
b. Ví dụ về thủ tục
Trong lệnh gọi 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à các giá trị cụ thể
được gọi là tham số giá trị
(tham trị)
VD: Các tham số chdai,
chrong của thủ tụcVe_hcn
gọi là tham trị
Trong lời gọi thủ tục Ve_hcn; thì các tham số chdai, chrong
có tên gọi là gì?
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
b. Ví dụ về thủ tục
Trong lời gọi thủ tục Ve_hcn(a,b); thì các biến a,b
có tên gọi là gì?
Trong lệnh gọi 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à các biến chứa
dữ liệu ra được gọi là tham
số biến (tham biến)
Chú ý: Để phân biệt tham trị và
tham biến, Pascal sử dụng từ
khóa var để khai báo những
tham số biến.
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
b. Ví dụ về thủ tục
begin
end.
begin
end;
begin
end.
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
b. Ví dụ về thủ tục
Program tham_bien1;
var a, b : integer;
Procedure Hoan_doi( var x,y: integer);
var Tg: integer;
begin
tg:= x;
x:=y;
y:= tg;
end;
Begin
a:= 5; b:= 10;
writeln(a:6, b:6);
Hoan_doi(a,b);
Writeln(a:6, b:6);
Readln
End.
End;
Begin
End.
1. Cách viết và sử dụng thủ tục
a. Cấu trúc của thủ tục
b. Ví dụ về thủ tục
Program thambien2;
Var a,b : integer;
Procedure Hoan_doi(x:integer; var y: integer);
var Tg: integer;
begin
tg:= x;
x:=y;
y:= tg;
end;
Begin
a:= 5; b:= 10;
writeln(a:6, b:6);
Hoan_doi(a,b);
Writeln(a:6, b:6);
Readln
End.
CHÚC QUÝ THẦY, CÔ VÀ CÁC EM SỨC KHỎE VÀ THÀNH ĐẠT!