-Cú pháp For (biến đếm):(giá trị đầu) to (giá trị cuối) do (công việc)

-Cho biến biến chạy từ giá trị đầu và lặp lại công việc đến khi biến đếm chạy đến giá trị cuối 

Ví dụ : For i:=1 to 5 do writeln('hoc tap') ;

-cú pháp while (điều kiện) do (câu lệnh)

-Trong khi điều kiện đúng thì vẫn thực hiện câu lệnh,chỉ dừng lại khi điều kiện sai

Ví dụ

While i>5 do i:=i+2;

*cú pháp For:

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

- Hoạt động: câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp. Số vòng lặp là biết trước và bằng giá trị cuối - giá trị đầu+1. Khi thực hiện, ban đầu biến đếm sẽ nhận giá trị đầu, sau mỗi vòng lặp, biến đếm được tự động tăng thêm 1 đơn vị cho đến khi bằng giá trị cuối.

Vd:

program ct;

uses crt;

var i,n,s:integer;

begin

clrscr;

write('nhap n:=');readln(n);

s:=0;

for i:=1 to n do s:=s+i;

writeln('tong cua n do tu nhien dau tien la:',s);

readln

end.

* cú pháp while:

 While <điều kiện> do<câu lệnh>;

- hoạt động:

B1:kiểm tra điều kiện

B2: nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1.

Vd:

T:=0;

i:=1;

while i<=100 do begin T:=T+1/i; i:=i+1; end;

writeln(T);

chúc bạn học tốt

cho mình câu trả lời hay nhất nha