Bài 17.2 biến Tham số

Bµi
17
Gi¸o ¸n ®iÖn tö tin häc líp 11

VD1: Lập chơng trình tính tổng luỹ thừa S = a
m
+b
n
+c
p
+d
q
VD1: Lập chơng trình tính tổng luỹ thừa S = a
m
+b
n
+c
p
+d
q

Viết chơng trình con dạng tổng quát Luythua = x
k

Trong đó
: Luythua, x kiểu thực, k kiểu nguyên.

Khi tính luỹ thừa của các số hạng trong tổng trên ta chỉ cần gọi tên ch
ơng trình con Luythua và thay thế (x,k) bằng các giá trị tơng ứng. Ví dụ
nh: Luythua(a,m). luythua(b,n), luythua(c,p),luythua(d,q).

* INPUT : Các cơ số a,b,c,d và các số mũ lần lợt n,m,p,q
* OUTPUT : S

Program tong_luy_thua;
Uses crt;
Var a,b,c,d,S : real;
n,m,p,q :integer;
Function luythua(x: real,k:integer): real;
Var j: integer; Lt:Real;
begin
Lt:=1;
For j:=1 to k do Lt:=Lt*x;
Luythua:=Lt;
end;
BEGIN
Write(‘ Nhap vao cac co so a,b,c,d ‘); readln(a,b,c,d);
write(‘ Nhap vao cac so mu m,n,p,q: ’); readln(n,m,p,q);
s:= luythua(a,m)+luythua(b,n)+luythua(c,p)+luythua(d,q);
Writeln(‘ Tong luy thua =’, S:7:2);
Readln;
END.


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 bộ.

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à các
tham số thực sự.

Ví dụ 2: 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ụ 2: 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.
Theo bạn để 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?

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¸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

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 biÕn)
Tham sè
h×nh thøc
BiÕn toµn côc

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ự.