1
2
Hoạt
động
Chưa
biết ở ví dụ nào lặp với
Lặp
10
lần
trước sốsố
lầnlần
lặp biết trước?
3
S:= 0;
For
i:=1 to 10 do
............................
Begin
Write(‘nhap n= ‘);
readln(n);
S:= S+ n;
End;
4
Bài 8:
5
1. Các hoạt động lặp với số lần chưa biết trước
Hãy tìm 2 ví dụ
về các hoạt động
lặp với số lần
chưa biết trước?
6
1. Các hoạt động lặp với số lần chưa biết trước
Bạn
hỷ
đã
quyết định lặp
lại hoạt động
trên mấy lần?
7
1. Các hoạt động lặp với số lần chưa biết trước
Hoạtnày
động
Lần
Hỷ gọi
đã
điện lại
thoạihoạt
của
lặp
bạn trên
Hỷ mấy
sẽ
động
dừng lại khi
lần?
nào?
8
1. Các hoạt động lặp với số lần chưa biết trước
9
1. Các hoạt động lặp với số lần chưa biết trước
n
Tổng Tn
0
1
2
3
T0 ← 0
T1 ← T0+1= 1
T2 ← T1+2=1+2
T3 ← T2+3= 1+2+3
…
n
…
Tn = Tn-1+n
(Sao cho Tn>1000)
Điều kiện Tn ≤ 1000
Đúng
Đúng
Đúng
Đúng
…
Sai, kết thúc việc
tính tổng
10
1. Các hoạt động lặp với số lần chưa biết trước
Thuật
toán?
11
1. Các hoạt động lặp với số lần chưa biết trước
Việc tính
Bước nào lặp
tổng
dừng
lại
nhiều
nhất
lại lặp
khi lại
nào?
và
bao
nhiêu lần?
12
1. Các hoạt động lặp với số lần chưa biết trước
Sai
T≤1000?
Đúng
n ← n+1;
T ← T+n;
13
2. Ví dụ về lệnh lặp với số lần chưa biết trước
Cú pháp câu
lệnh lặp với
số lần chưa
biết trước?
- VD 2.1:
a:= 10;
While a>0 do
a:= a-1;
- VD 2.2:
b:= 0;
While b<10 do
Begin
b:= b+1;
write(b:3);
end;
14
2. Ví dụ về lệnh lặp với số lần chưa biết trước
15
2. Ví dụ về lệnh lặp với số lần chưa biết trước
16
2. Ví dụ về lệnh lặp với số lần chưa biết trước
Điều kiện?
Sai
Đúng
Câu lệnh
17
Var n: integer;
T: longint;
Begin
n:= 0; T:= 0;
while T<=1000 do
begin n:= n+1; T:= T + n; End;
writeln(‘Tong T= ’,T);
writeln(‘N nho nhat la: ‘,n);
Readln
End.
18
2. Ví dụ về lệnh lặp với số lần chưa biết trước
19
Củng cố
20
Củng cố
Lặp với số lần biết trước
For <bđ>:= <gtđ> to <gtc> do
Cách mô
tả các
lệnh>;
CẤU
TRÚC
hoạt động lặp đi
lặp lại nhiều lần
CẤUgọi
TRÚC
LẶP
còn được
là gì?
LẶP
Lặp với số lần chưa biết trước
While <điều kiện> do
<câu lệnh>;
21
22
SẴN
SÀNG?
23
* Câu 1: Hoạt động nào sau đây
là không phải là lặp với số lần
biết trước?
A Tính diện tích 10 ngôi nhà.
B
Nhập các số nguyên từ bàn phím cho
đến khi đủ 50 số.
C Nhặt từng ngọn lá ngoài sân.
D Tính tổng các số tự nhiên từ 1 đến 20
24
* Câu 2: Cú pháp của câu lệnh
lặp với số lần chưa biêt trước là?
A For <biến_đếm>:= <gt_đầu> to
<gt_cuối> do <câu_lệnh>;
B
While <câu lệnh> do <điều kiện>;
C While i<10 do i:= i-1;
D While <điều kiện> do <câu lệnh>;
25