Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?

Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?

S:=0; n:=0;

while S<10 do

begin

n:= n+1;

S:= s+n

end;