Please enable JavaScript.
Coggle requires JavaScript to display documents.
Bài 7: Câu lệnh lặp, Cú pháp : For <biến đếm> := <giá trị đầu>…
Bài 7: Câu lệnh lặp
I. Câu lệnh lặp . Một lệnh thay cho nhiều lệnh
Ví dụ : Tính tổng của 100 chữ số tự nhiên đầu tiên
B1 : S <-0 , i <-0
B2 : i<-i+1
B3 : nếu i<=100 thì S<-S+1 , quay lại B2
B4 : in kết quả , kết thúc
Cách mô tả các hoạt động lặp thuật toán như trong ví dụ trên gọi là cấu trúc lặp
Mọi ngôn ngữ lập trình đều có các "cách" để chỉ thị cho máy tính thực hiện cấu trúc lặp với một câu lệnh . Đó là câu lệnh lặp
II. Câu lệnh lặp for....do
Trong đó :
For
,
to
,
do
là từ khóa
Biến đếm : biến kiểu nguyên
Gía trị đầu , giá trị cuối : là biểu thức cùng kiểu với biến đếm ( giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối
Câu lệnh : không được làm thay đổi giá trị biến đếm , nếu có nhiều hơn 1 lệnh thì phải đặt trong từ khóa Begin.....End
Câu lệnh lặp góp phần giúp giảm nhẹ công sức viết chương trình máy tính
III. Tính tổng và tích bằng câu lệnh lặp
Ví dụ 5
:(SGK)
Cú pháp :
For
<
biến đếm
>
:=
<
giá trị đầu
>
to
<
giá trị cuối
>
do
<
câu lệnh
>
;
program Tinh_tong;
var N,i : integer;
begin
S : longint;
write('Nhap so N = ') ; readln(N);
S :=0;
for i := 1 to N do S :=S+i;
writeln('Tong cua ' ,N, ' so tu nhien dau tien S = ' ,S);
readln;
end .