Bài 18 - Ví dụ về cách viết và sử dụng CTC

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.

Program tgps;
Uses crt;
Var tu,mau,c,d : integer;
Function UCLN( a,b :integer) : integer;
Begin
While a<> b do
if a>b then a := a-b else b:=b-a;

UCLN := a;
end;
BEGIN
Write( Nhap vao tu so vµ mau so: ); ‘ ’
readln(tu,mau);
C := tu div UCLN(tu,mau) ;
d := mau div UCLN(tu,mau);
Writeln( Phan so toi gian = , c, / , d);‘ ’ ‘ ’
Readln;
END.
Write( Nhap vao tu so va mau so: );‘ ’
C := 6 div
d := 10 div
UCLN(6,10)
UCLN(6,10);
Writeln( Phan so toi gian = , 3, / , 5);‘ ’ ‘ ’
Readln;
END.
BEGIN
Readln(tu,mau);
USCLN=2;
USCLN=2;
Nhap vao tu so va mau so: 6 10
Phan so toi gian = 3/5

Hóy Nh !
Biến:
Tham số
- 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ộ.
- 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ự.