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

GIÁO ÁN ĐIỆN TỬ MÔN TIN HỌC LỚP 11
Chào mừng ngày nhà giáo Việt Nam 20/11
Chào mừng quý thầy cô giáo về dự giờ thăm lớp
CẤU TRÚC LẶP(T3)
1. Bài toán:
*Bài toán : Một người gửi tiết kiệm không kì hạn với số tiền là A đồng với lãi suất là 0,3% tháng. Hỏi sau bao nhiêu tháng người đó thu được số tiền ít nhất là B đồng? Biết rằng việc gửi tiết kiệm không kì hạn thì lãi không được cộng vào vốn



*Ý tưởng:
- Input: A, B
- Output: T( Số tháng)
- Goc:=A;
- Số tiền sau 1 tháng là A:=A+ Goc*0.003
CÚ PHÁP:
WHILE <Điều Kiện> DO
;


Trong đó:
While, do là các từ khóa
Điều kiện: giá trị trả về thuộc kiểu lôgic
Câu lệnh: là câu lệnh đơn hoặc ghép.
2. Lặp với số lần không biết trước, Câu lệnh While - Do
*Sơ đồ giải thuật:
Điều kiện
Câu lệnh
T
F
Không thực hiện
câu lệnh sau Do
*Cách thực hiện:
+Nếu <Điều kiện> có giá trị đúng (T) thì thực hiện ngay sau Do rồi quay lại kiểm tra <Điều kiện> và quá trình tiếp tục.
+Nếu <Điều kiện> có giá trị sai (F) thì kết thúc câu lệnh này, tiếp tục chương trình.
*Lưu ý: Điều kiện sau Do nếu cần thực hiện một lệnh ghép thì các câu lệnh sau Do đó thì phải đặt chúng giữa Begin…end;
3. Các ví dụ áp dụng:
T:=0; goc:=A
AA:=A+Goc*0.003
T:=T+1
T
Nhập A,B
F
In T và kết thúc
Bài tâp 1:
Chương trình:
Program vdu;
Var A,B,goc:real;
………….
Begin
………………………………………
……………………………………..
………………………………….
Begin ………………..
…………….
end;
………………………….
Readln;
End.
T:Byte;
Write(‘nhap so tien A, B’); readln(A,B);
goc:=A;
While AA:=A+goc*0.003;
T:=T +1;
Writeln(‘ So thang la’,T:4);
T:=0;
Củng Cố
Câu 1: Để thực hiện các thao tác lặp với số lần không biết trước ta sử dụng cấu trúc sau:
IF - THEN; b) FOR – DO;
c) WHILE – DO; d) CÂU LỆNH GÁN;
Câu 2: Giá trị trả về của biểu thức điều kiện trong câu lệnh While – Do là:
Giá trị nguyên; b) Giá trị lôgíc;
c) Tuỳ thuộc vào biểu thức lôgic hay biểu thức số học;
d) Giá trị kiểu thực;
Câu 3: Cho đoạn chương trình sau:
Begin
S:=0; n:=1;
While 1/(a+n)>=0.0001 do
Begin
S:=S+1/(a+n);
n:=n+1;
End;
Writeln(‘ tong la’, S:6:2);
End. Chương trình trên thoát khỏi câu lệnh While khi nào?
a) n=100; b) 1/(a+n)=0.0001; c) S:=100; d) 1/(a+n)<0.0001
Câu 4: Cho đoạn chương trình sau:
Begin
a:=5;
While a>0 do
Begin
write(a:4);
a:=a+1;
End;
readln;
End. Kết quả chương trình trên là:
5 6 7 8 9 10; b) sai lỗi cú pháp ở line 4; c) lặp vô hạn;
d) 5 10 15;
Ghi nhớ
Cấu trúc lặp: While < Điều kiện> Do
< Câu lệnh>;
Câu lệnh While – do thực hiện thao tác lặp với số lần không biết trước.
Điều kiện có giá trị trả về giá trị lôgic