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