Составьте блок схему алгоритма и программу вычисления количества и суммы целых чисел из промежутка [-8; 4), кратны 4

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (n,s,k):=(-8,0,0);
  while n<=4 do begin
    s+=n; k+=1;
    n+=4
    end;
  Writeln('Сумма=',s,', количество слагаемых ',k)
end.

Результат
Сумма=-8, количество слагаемых 4

Результат
Сумма 8
количестваная слагаемое 4