Tiết 15 - Tin học 11

GIẠO ẠN TIN HC 11 szp1372512051.doc
Ngy soản: Monday, October 22th, 2007
Bi 2
Cáu lãûnh làûp FOR
I. MỦC TIÃU:
1. Kiãún thỉïc :
 Nàõm vỉỵng cụ phạp, cạch thỉûc hiãûn ca cáu lãûnh làûp FOR.
2. K nàng:
 Hc sinh cọ thãø sỉí dủng lãûnh FOR trong láûp trçnh.
3. Thại âäü:
 Hc sinh têch cỉûc ch âäüng, nghiãm tục, chênh xạc trong nghiãn
cỉïu khoa hc.
II. TRNG TÁM KIÃÚN THỈÏC
 Cạch sỉí dủng cạc cáu lãûnh vãư láûp trçnh âàûc biãût l cáu lãûnh
FOR
III. CHØN BË GIẠO CỦ:
 Giạo viãn : Chn bi táûp, cạc bi táûp måí räüng náng cao.
 Hc sinh: Lm cạc bi táûp â ra åí nh.
IV. TIÃÚN TRÇNH BI DẢY:
1. ÄØN ÂËNH LÅÏP-KIÃØM TRA SÉ SÄÚ:
2. KIÃØM TRA BI C:
 Cụ phạp, så âäư khäúi v cạch thỉûc hiãûn cáu lãûnh làûp WHILE
3. NÄÜI DUNG BI MÅÏI:
3.1. Âàût váún âãư: Nhỉỵng hiãûn tỉåüng làûp âi làûp lải våïi säú láưn
âënh trỉåïc trong chỉång trçnh ngän ngỉỵ Pascal thãú no?
3.2. Triãøn khai bi:
NÄÜI DUNG PHỈÅNG PHẠP GING DẢY
I. BI TOẠN:
Li sút k=0.01, säú tiãưn (ban âáưu): A
Gåíi trong N thạng. Hi tiãưn cáưn rụt ra?
1. Dỉỵ liãûu vo ra:

Input : Väún A, Säú thạng N, K
Output : Säú tiãưn (A sau N thạng)
2. Täø chỉïc dỉỵ liãûu:
Hàòng: K=0.01
Biãún: A: Säú thỉûc; N,T: Säú ngun
3. tỉåíng gii thût
Väún thạng sau A:= A + A*K
Làûp lải N láưn tênh (tỉì T:=1 âãún N)
II. CÁU LÃÛNH LÀÛP FOR
1. Cụ phạp :
FOR <Biãún âãúm>:=<V1> TO <V2>
DO
S
<Cáu lãûnh >[;]
Trong âọ:

For, to,do:
Tỉì khoạ

V1, V2:
Cạc giạ trë Ngun,
Char

Biãún âãúm:
Kiãøu Ngun, Char
CẠP XN TỤ
TIÃÚT
15
Biãún<=V2
Cáu lãûnh

Biãún := V1
Biãưn:=Biãún + 1
Biãún<V2
GIẠO ẠN TIN HC 11 szp1372512051.doc
2. Så âäư khäúi:
3. Thỉûc hiãûn lãûnh:
B1: Gạn Biãún âãúm:= V1
B2: Kiãøm tra Biãún âãúm <= V2
B3: Nãúu Âụng thç : Thỉûc hiãûn <Cáu
lãûnh>
B4: Nãúu Biãún âãúm<V2 thç:
1) Tàng Biãún âãúm:= Biãún âãúm
+ 1
2) Quay vãư bỉåïc 2
B4: Kãút thục lãûnh FOR
4. Vê dủ:
5. Ghi chụ:
 Thỉûc hiãûn cäng viãûc <Cáu lãûnh>
trong mäüt säú láưn làûp hỉỵu hản.
 Säú láưn làûp = <V2> - <V1>+1
 <Bt1> l giạ trë âáưu , <Bt2> l giạ
trë cúi ca biãún âãúm
 Biãún âãúm phi cọ kiãøu säú ngun
Integer hồûc Char
III. CHỈÅNG TRÇNH:
IV. VÊ DỦ ỈÏNG DỦNG
Bi 1: Tênh täøng S = 1+2 + 3 + ... + n
N nháûp vo tỉì bn phêm.
PROGRAM VD40;
VAR

N,S,I: integer;
BEGIN
WRITELN( Nhap säú N: ); ‘ ’
READLN(N);
S:=0;
For I:=1 TO N DO
S:=S+i;
WRITE( Täøng S = , s); ‘ ‘
READLN;
END.
Vê dủ:
FOR T:=1 TO N DO
A:=A+A*K;
FOR CHU:='A' TO 'Z' DO
WRITE(CHU:2);
Bi 2: Tçm nghiãûm ngun
dỉång ca phỉång trçnh
2x+y=10
PROGRAM VD;
VAR
X,Y: integer;
BEGIN
FOR X:=0 TO 5 DO
FOR Y:=0 TO 10 DO
IF 2*X+Y=10 THEN
Begin
writeln( x= ,x); ‘ ‘
writeln( y= ,y);‘ ‘
writeln( ****** );‘ ‘
End;

READLN;
END.
4. CNG CÄÚ:
 Cáúu trục ca cáu lãûnh FOR
5. DÀÛN D:
 Bi táûp vãư nh: Bi táûp WHILE viãút thnh cáu lãûnh FOR
Bi 1: Âäøi tiãưn: Bao nhiãu cạch âäøi 20 âäưng ra cạc tiãưn cọ mãûnh
giạ 5,2,1
Bi 2: G + chọ = 36, chán g + chán chọ = 100
Bi 3: In ra cạc kê tỉû chỉỵ hoa tỉì 'A' âãún 'Z'
CẠP XN TỤ