Câu lệnh While do

TRƯỜNG CAO ĐẲNG CÔNG NGHIỆP VIỆT ĐỨC
BÀI GIẢNG
CÂU LỆNH LẶP KHÔNG BIẾT TRƯỚC SỐ LẦN LẶP
Người thực hiện : Trương Thị Lệ Châm
CÂU LỆNH WHILE…DO
KIỂM TRA BÀI CŨ
Câu hỏi: Sử dụng vòng lặp FOR viết chương trình tính S=1 + 2 + 3 +...+n, với n nguyên dương nhập từ bàn phím.
CHƯƠNG 2 – CÁC KIỂU DỮ LIỆU CƠ BẢN, CÁC CẤU TRÚC LỆNH
2.5. CÂU LỆNH LẶP KHÔNG BIẾT TRƯỚC SỐ LẦN LẶP
a, Chức năng
Câu lệnh WHILE…. DO được dùng để xây dựng chu trình với số lần lặp không xác định,
2.5.1. CÂU LỆNH WHILE…DO
c, Hoạt động
Bước 1: Xác định giá trị của
Bước 2:
 thực hiện
Sau đó quay trở lại bước 1
Kiểm tra giá trị của

 Thoát khỏi lệnh While… Do
b, Cú pháp
WHILE DO ;
đúng
sai
d, Lưu đồ thuật toán
BT Logic
Công việc

Thoát khỏi câu lệnh While…do
Đúng
Sai
BT Logic
Công việc
BT Logic
e, Ví dụ
Chương trình:

Var x, y: Word;
Begin
Write(‘Nhap x:’); readln(x);
Write(‘Nhap y:’); readln(y);
WHILE x<>y DO
IF x>y then x: = x – y
Else y: = y – x;
Writeln(‘USCLN:’,x);
Readln;
End.

x = 9;
Lần 1
x <> y
9<>6
9 > 6
x = 9 - 6
x > y
x: = x - y
Đ
Đ
y = 6
x = 3;
Lần 2
3 <> 6
Đ
3 > 6
S
y = 6 - 3
y = 3
Lần 3
3 <> 3
S
Thoát khỏi
câu lệnh While…do
y: = y - x
UCLN = 3
Var i, a : word;
S: Real;
BEGIN
Write(‘ Nhap a:’); readln(a);
S:=0; i:=1;
WHILE S<=a DO
Begin
S:=S+1/i;
i:=i+1;
End;
Write(‘So can tim la:’,i);
Readln;
END.
Chương trình:
Lựa chọn đáp án đúng để điền vào chỗ trống trong đoạn chương trình.
While i<=n Do
Begin
S:=S+i; i:=i+1;
End;
c, While i<=n Do S:=S+i;
....................................................................
....................................................................
....................................................................
d, While i<=n Do
Begin
i:=i+1; S:=S+i;
End;
Ví dụ 3:
Sử dụng câu lệnh WHILE... DO viết chương trình tính S=1+2+3+...+n với n nguyên dương nhập từ bàn phím.
b,
BÀI TẬP VỀ NHÀ:
Em hãy sử dụng câu lệnh WHILE...DO để thực hiện bài toán tính tiền gửi ngân hàng với tiền lãi hàng tháng gộp vào vốn. Vậy cần gửi tối thiểu là bao nhiêu tháng để có được số tiền S cho trước?
Xin trân thành cảm ơn!