Помогите, пожалуйста! Очень надо! Определите значение переменных s и i после выполнения фрагмента программы:


s:=0; i:=-3;

while i<2 do

begin if i<0 then A:=i*i else A:=i

s:=s+A;

i:=i+1;

end;

i будет = 2

s будет = 15