[r]
Trang 1BÀI 8:
Trang 31 Nêu c u trúc c a vòng l p for ? ấ ủ ặ
Vòng l p for có c u trúc nh sau: ặ ấ ư
For <bi n đ m>:=<giá tr đ u> to <giá tr cu i> ế ế ị ầ ị ố
do <câu l nh>; ệ
2.Vi t ch ế ươ ng trình tính t ng S là t ng các s t ổ ổ ố ự nhiên t 1 đ n 10 ừ ế
program baitap;
var S,i:byte;
begin
S:=0;
for i:=1 to 10 do S:=S+i;
writeln(‘S=',S);
readln
end
Trang 4Bài toán: Tìm s nguyên n sao cho ố
t ng các s t 1 t i n là s nh nh t ổ ố ừ ớ ố ỏ ấ
l n h n 1000 ớ ơ
Các em có th gi i bài toán này b ng ể ả ằ
Trang 51 Các ho t đ ng l p v i s l n ch a bi t tr ạ ộ ặ ớ ố ầ ư ế ướ c
X y ra 2 tình hu ng: ả ố
Tình hu ng 1: ố B n Long g i cho Trang nh ng ạ ọ ư
không có ng ườ i nh c máy và b n Long quy t ấ ạ ế
đ nh g i thêm 2 l n n a, n u không có ng ị ọ ầ ữ ế ườ i
nh c máy s k t thúc cu c g i không g i n a ấ ẽ ế ộ ọ ọ ữ
T c là, b n Long đã xác đ nh (hay bi t tr ứ ạ ị ế ướ c) s ố
l n mình ph i g i đi n là 2 l n ầ ả ọ ệ ầ
Trang 61 Các ho t đ ng l p v i s l n ch a bi t tr ạ ộ ặ ớ ố ầ ư ế ướ c
Tình hu ng 2: ố L n khác b n Long quy t ầ ạ ế
đ nh s g i đ n khi nào có ng ị ẽ ọ ế ườ ắ i b t máy
m i thôi ớ
b n Long s ạ ẽ l p đi l p l i công vi c ặ ặ ạ ệ :
nh c máy, quay s , g i cho Trang, Long ấ ố ọ không bi t tr ế ướ ố ầ c s l n Long s ph i g i ẽ ả ọ
l p v i s l n không xác đ nh ặ ớ ố ầ ị Đi u ki n ề ệ
ng ng vi c l p ư ệ ặ : có ng ườ ắ i b t máy
Trang 71 Các ho t đ ng l p v i s l n ch a bi t tr ạ ộ ặ ớ ố ầ ư ế ướ c
Ví d 2: ụ
N u c ng l n lế ộ ầ ượt n s t nhiên đ u tiên (n=1,2,3,…), ố ự ầ
ta s đẽ ược các k t qu T1=1, T2=1+2, T3=1+2+3, …ế ả tăng d n C n c ng bao nhiêu s t nhiên đ u tiên đ ầ ầ ộ ố ự ầ ể
ta nh n đậ ượ ổc t ng Tn nh nh t l n h n 1000? ỏ ấ ớ ơ
Trang 81 Các ho t đ ng l p v i s l n ch a bi t tr ạ ộ ặ ớ ố ầ ư ế ướ c
THU T TOÁN: Ậ
Kí hi u S là t ng c n tìm, ta có thu t toán sau:ệ ổ ầ ậ
B ướ c 1: S 0, n 0
B ướ c 2: N u S<= 1000, nế n+1; ngượ ạc l i, chuy n ể
t i bớ ước 4
B ướ c 3: S S+n và quay l i bạ ước 2
B ướ c 4: In k t qu S và n là s t nhiên nh nh t sao ế ả ố ự ỏ ấ cho S > 1000 K t thúc thu t toán.ế ậ
Trang 9S Đ KH I: Ơ Ồ Ố
Trang 101 Các ho t đ ng l p v i s l n ch a bi t tr ạ ộ ặ ớ ố ầ ư ế ướ c
Nh n xét: ậ Đ vi t ch ể ế ươ ng trình ch d n máy ỉ ẫ tính th c hi n các ho t đ ng l p nh trong ự ệ ạ ộ ặ ư
các ví d trên, ta có th s d ng câu l nh có ụ ể ử ụ ệ
d ng ạ l p v i s l n ch a bi t tr ặ ớ ố ầ ư ế ướ c
(While…do)
Trang 112 Ví d v l nh l p v i s l n ụ ề ệ ặ ớ ố ầ
ch a bi t tr ư ế ướ c:
Trong Pascal câu l nh l p v i s l n ch a bi t ệ ặ ớ ố ầ ư ế
trước có d ng:ạ
While <đi u ki n> do <câu l nh>ề ệ ệ
Trong đó:
- Đi u ki nề ệ thường là m t phép so sánh.ộ
- Câu l nhệ có th là câu l nh đ n gi n hay câu ể ệ ơ ả
l nh ghép.ệ
Trang 122 Ví d v l nh l p v i s l n ụ ề ệ ặ ớ ố ầ
ch a bi t tr ư ế ướ c:
* Câu l nh này đệ ược th c hi n nh sau:ự ệ ư
B.1: Ki m tra đi u ki nể ề ệ
B.2: N u đi u ki n ế ề ệ Sai, câu l nh s b b qua ệ ẽ ị ỏ và
vi c th c hi n l nh l p k t thúc N u đi u ki n ệ ự ệ ệ ặ ế ế ề ệ
Đúng, th c hi n câu l nh ự ệ ệ và quay l i bạ ước 1
Trang 132 Ví d v l nh l p v i s l n ụ ề ệ ặ ớ ố ầ
ch a bi t tr ư ế ướ c:
*M t s ví d : ộ ố ụ
VD2: Tìm s nguyên n sao cho t ng t 1 t i n là s ố ổ ừ ớ ố
nh nh t l n h n 1000ỏ ấ ớ ơ
Các em hãy d a vào thu t toán đã xây d ng cho ví ự ậ ự
d 2 trên đ vi t chụ ở ể ế ương trình
Trang 142 Ví d v l nh l p v i s l n ch a bi t ụ ề ệ ặ ớ ố ầ ư ế
tr ướ c:
Ch ươ ng trình nh sau: ư
program vd3;
var n,s:byte;
begin s:=0;n:=0;
while s<=1000 do begin
n:=n+1;s:=s+n;
end;
writeln('So can tim la: ',n);
writeln(‘Tong tim duoc la:' , S);
readln end.
Trang 15VD4: Hãy cho bi t ch ế ươ ng trình sau ch y nh th nào? ạ ư ế program VD4;
var tieptuc:char;
ten:string;
begin
tieptuc:='c';
while tieptuc='c' do
begin
write('nhap ten cua ban: ');
readln(ten);
writeln('chao ban ',ten);
write('Tiep tuc ? c/k: ');
readln(tieptuc);
end;
readln;
end.
Trang 16VD4: Hãy cho bi t ch ế ươ ng trình sau ch y nh th nào? ạ ư ế
Đây là ch ươ ng trình l p đi l p l i vi c nh p tên và xu t ặ ặ ạ ệ ậ ấ
ra câu chào, vi c l p k t thúc khi nh p kí t khác “c” t ệ ặ ế ậ ự ừ bàn phím
Trang 17BÀI T P Ậ Hãy xác đ nh nh ng tr ị ữ ườ ng h p sau có ợ
ph i là tr ả ườ ng h p l p v i s l n ch a bi t ợ ặ ớ ố ầ ư ế
tr ướ c hay không:
1.S a l i m t đo n văn b n sau khi đánh máy ử ỗ ộ ạ ả 2.Đ m s b ế ố ướ c đi t nhà t i tr ừ ớ ườ ng
3.Đ m s giây m t h c sinh gi i m t bài toán ế ố ộ ọ ả ộ 4.Tìm s n sao cho n là s nguyên d ố ố ươ ng l n ớ
nh t nh h n 100 ấ ỏ ơ
5.Đ m s xe máy ch y ngang qua m t đo n ế ố ạ ộ ạ
đ ườ ng trong m t ngày ộ
6.Tính t ng n s nguyên d ổ ố ươ ng v i n nh p t ớ ậ ừ bàn phím
7.Đ m s lá có trên m t cây ế ố ộ
Đ
Đ
Đ
S
Đ
S
Đ
Trang 18CHÚC CÁC EM H C T T Ọ Ố