Задание
s, k: Integer;
Begin
For k := 1 To 8 Do Readln \(a⟨1⟩\);
s := 0;
For k := 1 To 8 Do
If a
Writeln \(s\)
End
в записи оператора s := s + a
Каким оказался ответ после исполнения неверной программы, если в качестве элементов массива
были введены числа -1, 3, -2, 4, -5, 6, -7, 8?
При наборе программы вычисления суммы отрицательных элементов массива
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