các câu lệnh cấu trúc lập

for- do

Câu lệnh for- do với hai dạng tiến và lùi:

- Dạng lặp tiến :

for <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh> ;

- Dạng lặp lùi:

for <biến đếm>:= <giá trị cuối> dowto <giá trị đầu> do <câu lệnh> ;

Trong đó:

- biến đếm là biến đơn, thường có kiểu nguyên.

- giá trị đầu, giá trị cuối là các biểu thức cùng kiểu với biến đếm và giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối. Nếu giá trị đầu lớn hơn giá trị cuối thì vòng lặp không được thực hiện.

while- do

Lặp với số lần chưa biết trước có hai dạng:

Dạng 1 : Trong khi <điều kiện> còn đúng thì còn thực hiện <công việc>

Dạng 2: Còn thực hiện <công việc> trong khi <điều kiện> còn đúng.

ví dụ

program vi_du;

uses crt;

var i:integer;

begin

clrscr;

for i:=1 to 100 do

write('em xin hua se khong noi chuyen nua va chep phat du 100 lan');

readln;

end.

Dạng lặp tiến : 
for <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
Vd :
uses crt;
var i, s : integer;
begin
clrscr;
s := 0;
for i := 1 to 5 do s := s + i;
writeln(‘tong s =’, s);
readln
end.
Dạng lặp lùi :
for <biến đếm> := <giá trị cuối> downto <giá trị đầu> do <câu lệnh>;
Vd :
uses crt;
var i, s : integer;
begin
clrscr;
s := 0;
for i := 5 downto 1 do s := s + i;
writeln(‘tong s = ‘, s);
readln
end.