При наборе программы вычисления суммы отрицательных элементов массива Var a: Array [1..8] Of Integer; s, k: Integer; Begin For k := 1 To 8 Do Readln (a[k]); s := 0; For k := 1 To 8 Do If a[k] < 0 Then s := s + a[k]; Writeln (s) End в записи оператора s := s + a[k] была допущена ошибка - вместо него был записан оператор s := s + 1. Каким оказался ответ после исполнения неверной программы, если в качестве элементов массива были введены числа -1, 3, -2, 4, -5, 6, -7, 8? 4 8 -3 -15
Задание

При наборе программы вычисления суммы отрицательных элементов массива
Var a: Array

\[1\.\.8\]
Of Integer;
s, k: Integer;
Begin
For k := 1 To 8 Do Readln \(a⟨1⟩\);
s := 0;
For k := 1 To 8 Do
If a
\[k\]
< 0 Then s := s + a
\[k\]
;
Writeln \(s\)
End
в записи оператора s := s + a
\[k\]
была допущена ошибка - вместо него был записан оператор s := s + 1.
Каким оказался ответ после исполнения неверной программы, если в качестве элементов массива
были введены числа -1, 3, -2, 4, -5, 6, -7, 8?

  • 4
  • 8
  • -3
  • -15