Определите значения переменных s и i после выполнения фрагмента программы:
s:=0; i:=5;
while i>0 do
begin
s:=s+i;
i:=i-1;
end;

• s = 15, i = 0
• s = 0, i = -1
• s = 5, i = 0
• s = 15, i = 5