cấu trúc lặp có mấy dạng ? em hãy kể tên và mỗi dạng cho ví dụ giúp mình với mình cần gấp

Có 2 loại cấu trúc lặp
Gồm:

+ Lặp với số lần biết trước

+ Lặp với số lần chưa biết trước

Ví dụ: 

+ Lặp với số lần biết trước: 

program hi;

uses crt;

var a: integer;

begin

for a:=1 to 5 do

writeln(a);

readln;

end.

+ Lặp với số lần chưa biết trước

program hello;

var a, n: integer;

Tong: longint;

begin

write('a='); readln(a);

Tong :=0;

for n:=1 to a do Tong:=Tong+n;

write(S);

readln;

end.