Hãy cho biết giá trị của s sau khi thực hiện các câu lệnh

hãy cho biết giá trị giá trị của s sau khi thực hiện các câu lệnh
c) s:=0;
i:=5;
while i>=1 do
begin
s:=s+i;
i:=i-1;
end;