Чому буде дорівнювати значення змінної s?

Var i, s: integer;
 
    begin
               s := 0;
               for i: = 1 to 4 do
               begin
                            s := s +i;
                end;
     end;