Câu lệnh lặp... Câu lệnh lặp.[r]
(1)(2)Hãy nêu ví dụ hoạt động lặp trong sống hàng ngày.
• Đánh ngày lần
• Ăn ngày bữa chính
• Đi học ngày buổi
• Học đến thuộc
(3)1 Câu lệnh lặp Một lệnh thay cho nhiều lệnh
Ví dụ 1: vẽ hình vng có cạnh đơn vị (các em nghiên cứu sgk)
(4)4
1 Câu lệnh lặp Một lệnh thay cho nhiều lệnh
Ví dụ 2: tính tổng 100 số tự nhiên
BÀI 7: CÂU LỆNH LẶP
Thuật toán;
Bước 1:S0;i0
Bước 2: ii+1
Bước 3; i<=100 thì,SS+i, quay lại bước
(5)2 Câu lệnh lặp for…do:
a/ Cú pháp: b/ Trong đó:
• For, to, do: là từ khóa
•Biến đếm: biến kiểu nguyên
•Giá trị đầu, giá trị cuối: là biểu thức kiểu với biến đếm (giá trị đầu phải nhỏ giá trị cuối)
•Câu lệnh: Nếu có nhiều lệnh phải đặt
trong cặp từ khoá Begin end;
BÀI 7: CÂU LỆNH LẶP
(6)2 Câu lệnh lặp for…do
• Bước 1: biến đếm
gán cho giá trị đầu
• Bước 2: Nếu biến đếm
<= giá trị cuối thì:
- thực lệnh cần lặp - tăng biến đếm đơn
vị
- Ngược lại khỏi vịng lặp
SƠ ĐỒ KHỐI
Biến đếm:=giá trị đầu
Biến đếm<=giá trị cuối
Thực câu lệnh, biến đếm tăng 1 Đúng
Sai
c/ Hoạt động câu lệnh:
(7)2 Câu lệnh lặp for…do :
Áp dụng:
Hãy viết chương trình in số lần lặp đến 10
BÀI 7: CÂU LỆNH LẶP
Program lap; Uses crt;
Var i: integer; Begin
For i:= to 10
Writeln (‘day la lan lap thu ’, i ); Readln;
day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu day la lan lap thu 10
(8)8
2 Câu lệnh lặp for…do :
Áp dụng:
Hãy viết chương trình in màn hình số từ đến 10
BÀI 7: CÂU LỆNH LẶP
Program lap; Uses crt;
Var i: integer; Begin
For i:= to 10 Writeln ( i );
(9)For i:= to 20 Writeln (‘O’); 2 Câu lệnh lặp for…do :
BÀI 7: CÂU LỆNH LẶP
(10)10
2 Câu lệnh lặp for…do:
a/ Cú pháp: b/ Trong đó:
• For, to, do: là từ khóa
•Biến đếm: biến kiểu ngun
•Giá trị đầu, giá trị cuối: là biểu thức kiểu với biến đếm (giá trị đầu phải nhỏ giá trị cuối)
•Câu lệnh: Nếu có nhiều lệnh phải đặt
trong cặp từ khố Begin end;
•Số vịng lặp giá trị đầu –giá trị cuối +1
BÀI 7: CÂU LỆNH LẶP
(11)Bài (SGK-61) Sau thực đoạn chương trình sau, giá trị j bao nhiêu?
j:=0;
For i:=0 to j:=j+2;
(12)Nhận biết câu lệnh lặp
Các câu lệnh Pascal sau có hợp lệ hay khơng, vì sao?
a/ For i:=100 to writeln(‘A’); b/ For i:=1.5 to 10.5 writeln(‘A’); c/ For i=1 to 10 writeln(‘A’);
d/ For i:=1 to 10 do; writeln(‘A’);
12