tiãút 1 giaïo aïn tin hoüc 11 tiet15giao an 11 doc ngaìy soaûn monday october 22th 2007 baìi 2 cáu lãûnh làûp for i muûc tiãu 1 kiãún thæïc nàõm væîng cuï phaïp caïch thæûc hiãûn cuía cáu lãûnh là

TIÃÚT

15

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ổớ duỷng lóỷnh FOR trong lỏỷp trỗnh.
3. Thaù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ỉí duỷng caùc cỏu lóỷnh vóử lỏỷp trỗnh õỷc bióỷt laỡ
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óỳ
naỡo?
3.2. Triãøn khai bi:
PHỈÅNG PHẠP GING
NÄÜI DUNG
DẢY


I. BI TOẠN:
Li sút k=0.01, säú tiãưn (ban
Biãún := V1
âáưu): A
Gåíi trong N thạng. Hi tiãưn cáưn
rụt ra?
1. Dỉỵ liãûu vo ra:
Biãún<=V2
 Input : Väún A, Säú thạng N, K
 Output
: Säú tiãưn (A sau N
Biãưn:=Biãún + 1
thạng)
Cáu lãûnh
2. Täø chỉïc dỉỵ liãûu:
BiãúnHàịng: K=0.01
Trong âọ:
Biãún: A: Säú thỉûc; N,T: Säú

 For, to,do: Tỉì khoạ
ngun
 V1, V2: Cạc giạ trë Ngun,
3. tỉåíng gii thût
Char
Väún thạng sau A:= A + A*K
 Biãún âãúm: Kiãøu Ngun, Char
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 >[;]


Vê dủ:
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 Âuïng thỗ : Thổỷc hióỷn
<Cỏu lóỷnh>
B4: Nóỳu Bióỳn õóỳm1) Tng Biãún âãúm:= Biãún
âãúm + 1
FOR T:=1 TO N DO
2) Quay vãư bỉåïc 2
A:=A+A*K;

B4: Kãút thục lãûnh FOR
FOR CHU:='A' TO 'Z' DO
4. Vê dủ:
WRITE(CHU:2);
5. Ghi chụ:

 Thỉûc hiãûn cäng viãûc 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ọỳ
Baỡi 2: Tỗm nghióỷm nguyón
nguyón Integer hoỷc Char

III. CHặNG TRầNH:
IV. Vấ DU ặẽNG DUNG
Baỡi 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.

dổồng cuớa 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'