Bài 10. Cấu trúc lặp

Kính chào quý thầy cô và cácbạn học sinh đến với bài thuyết trình của nhóm I
1
Bài 10
Cấu trúc lặp
(tiết 2)
Cho ví dụ:
Ví dụ 1: Hãy viết đoạn lệnh tính tổng:
S = 1 + 2 + 3 + … + 8 + 9 + 10
Vậy đoạn lệnh trong pascal như sau:
S:=0;
For i:=1 to 10 do S:=S+i;
Ví dụ 2: Hãy viết đoạn lệnh tính tổng:
S = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + …
cho đến khi giá trị của S không được vượt quá một số N nhập từ bàn phím (N>0).
Nếu nhập N=1 thì việc cộng dồn lặp lại mấy lần?
Nếu nhập N=10 thì việc cộng dồn lặp lại mấy lần?
Nếu nhập N=30 thì việc cộng dồn lặp lại mấy lần?
Vậy ta có biết trước số lần cộng dồn ko?
KHÔNG!!!
1 lần
4 lần
7 lần
N có biết trước giá trị ko?
….v…v…..
S=1
S=10
S=28
Đặt vấn đề !!!
Vậy giải bài toán này như thế nào?
Bằng cách nào viết được chương trình của bài toán?
Cú pháp:

While <điều kiện> do ;

trong đó:
<điều kiện> là biểu thức logic;

là câu lệnh đơn hay câu lệnh ghép.
3. Câu lệnh while – do:
“trong khi” điều kiện còn đúng
hãy thực hiện câu lệnh
Câu lệnh
Điều kiện
Đúng
Sai
Sơ đồ hoạt động của câu lệnh While – do:
“trong khi” điều kiện còn đúng hãy thực hiện câu lệnh
Thoát
Ví dụ 2: Hãy viết chương trình tính tổng:
S = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + …
cho đến khi giá trị của S không được vượt quá một số N nhập từ bàn phím (N>0).
INPUT: N (N>0)
OUTPUT: S=1+2+3+4+…. trong khi S <= N.
Ví dụ 2: Hãy viết chương trình tính tổng:
S = 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 + 9 + …
cho đến khi giá trị của S không được vượt quá một số N nhập từ bàn phím (N>0).
Thuật toán:
Bước 1: Nhập vào số N (N>0); S ← 0; i ← 1;
Bước 2: Nếu S + i > N thì chuyển đến bước 5;
Bước 3: S ← S + i;
Bước 4: i ← i+1; rồi quay lại bước 2;
Bước 5: Xuất kết quả S ra màn hình, kết thúc.
Chương trình hoàn chỉnh:
program vi_du_2;
uses crt;
Var S, N, i: longint;
Begin
clrscr;
write(‘Nhap so N’); readln(N);
S:=0; i:=1;
while (S + i < N) do
begin
S:=S+i;
i:=i+1;
end;
write(‘Tong s=‘, s);
readln;
End.
Ví dụ 3: Hãy viết chương trình nhập vào một số N
nguyên dương và kiểm tra nếu N không thỏa mãn
thì phải bắt người dùng nhập lại N.
- Bước 2:
Khi N > 0
- Bước 3:
Nhập lại N;
- Bước 1: Nhập N.
Đưa ra N là số nguyên dương
=> Kết thúc
* Vòng lặp chỉ dừng khi N <=0
Đ
S
- Bước 4: Đưa ra N là số nguyên dương=> Kết thúc.
=> Bước 4
THUẬT TOÁN
Nhập lại N
=> Bước 2;
Chương trình hoàn chỉnh:
program vi_du_3;
uses crt;
Var N: integer;
Begin
clrscr;
write(‘Nhap so N’);
readln(N);
while (N <= 0) do
Begin
write(‘Hay nhap lai N’);
readln(N);
end;
write(‘Gia tri N=‘, N);
readln;
End.
Câu lệnh
Điều kiện
Đúng
Sai
Sơ đồ hoạt động của câu lệnh While – do:
Một số lưu ý khi SỬ DỤNG WHILE-D0:
Thoát
Một số lưu ý:
Nếu ngay lần kiểm tra điều kiện đầu tiên mà kết quả là sai (False) thì các câu lệnh trong vòng lặp sẽ không được thực hiện lần nào.
Một số lưu ý:
Số lần kiểm tra điều kiện cho kết quả đúng (True) cũng chính là số lần lặp.
Một số lưu ý:
Cần mô tả điều kiện chính xác, phù hợp để tránh rơi vào vòng lặp vô tận (không thể kết thúc).
Câu 1:
Hãy tính giá trị của s trong đoạn lệnh sau:
S:=0;
i:=1;
While (i < 5) do
Begin
S := S + i;
i := i + 1;
End;
A. S=9
B. S=10
C. S=11
Câu 2:
Hãy tính giá trị của s trong đoạn lệnh sau:
S:=0;
i:=10;
While not(i<=0) do
Begin
S := S + i;
i := i - 1;
End;
A. S=55
B. S=50
C. S=51
Edit by Tien Thanh, 2008
THPT Nguyễn Văn Trỗi
Hãy nhớ!
Câu lệnh lặp
trong pascal
WHILE <Điều kiện> DO
+ Ý nghĩa:
Câu lệnh sau Do sẽ được thực hiện lặp đi lặp lại khi Điều kiện còn đúng (True).
Vòng lặp sẽ thoát khi Điều kiện có giá trị False.

Cảm ơn quý thầy cô và các bạn
đã xem và lắng nghe
phần trình bày của nhóm I