Gọi thủ tục như thực hiện một lệnh, lệnh gọi thủ tục đặt trong phần thân chương trình chính Cách gọi thủ tục: Tên thủ tụctham số nếu có;... Bài tập củng cố • Viết thủ tục tính và xuất di[r]
Trang 1Ví dụ về cách viết và sử dụng chương trình con
BÀI 18:
Tiết
Trang 2Bài 18
Ví dụ về cách viết và sử dụng
chương trình con
1 Cách viết và sử dụng thủ tục:
a Cấu trúc của thủ tục
Procedure <Tên thủ tục>[(<danh sách tham số>)];
[<phần khai báo>];
Begin
<dãy lệnh của thủ tục>;
End;
Trang 3Bài 18
Ví dụ về cách viết và sử dụng
chương trình con
b Ví dụ về thủ tục
Procedure Ve_HCN;
(*không dùng phần khai báo *)
Begin
Writeln(‘* * * * * * * * * *’);
Writeln(‘* * * * * * * * * *’);
Writeln(‘* * * * * * * * * *’);
Writeln(‘* * * * * * * * * *’);
Phần đầu: Định nghĩa thủ tục tên Ve_HCN không dùng tham số
Phần thân: Dãy lệnh của thủ tục
Trang 4Muồn vẽ nhiều hình chữ nhật khác nhau
về kích thước thì làm thế nào?
Trang 5Xét chương trình
PROGRAM ve_hinh_chu_nhat;
USES Crt;
VAR c, n: integer;
Procedure Ve_HCN2(cao,ngang:integer);
Var I, j: integer
Begin
For i:=1 to cao do
Begin
For j:=1 to ngang do Write(‘ * ‘);
Writeln;
End;
End;
BEGIN
Clrscr;
Ve_HCN2(6,10); Writeln;
n:=14, c:=20; Ve_HCN2(c, n);
tham số hình thức
tham số thực sự
Biến toàn cục Biến cục bộ
Trang 6Xét chương trình có dùng
thủ tục hoán vị 2 số
PROGRAM vi_du_3;
USES Crt;
VAR m, n: integer;
Procedure Hoan_vi( var a, b:integer);
Var tam: integer;
Begin tam := a;
a := b;
b := tam;
End;
BEGIN Clrscr;
n:=4, m:=2; Writeln(‘m = ‘,m,’n = ‘,n);
Hoan_vi(m, n);
n:=4, m:=2; Writeln(‘m = ‘,m,’n = ‘,n);
END.
Tham số hình thức
Tham số thực sự
Trang 7Cách viết và dùng thủ tục
Cấu trúc của thủ tục
Procedure <Tên thủ tục>[(<danh sách tham số>)];
[<phần khai báo>];
Begin
<dãy lệnh của thủ tục>;
End;
thủ tục đặt trong phần thân chương trình chính
Cách gọi thủ tục: Tên thủ tục(tham số nếu có);
Trang 8Bài tập củng cố
• Viết thủ tục tính và xuất diện tích hình
vuông có độ dài cạnh bằng a
• Viết thủ tục tính và xuất diện tích hình
Tròn có bán kính bằng R
• Viết thủ tục tính và xuất diện tích hình chữ nhật có kích thước chiều cao và ngang
• Viết thủ tục tính và xuất diện tích hình
Tam giác biết đáy và chiều cao
Trang 9Dặn dò
• Xem trước nội dung phần 2 cách viết và
sử dụng hàm (SGK trang 101)
• Làm bài tập chương VI