3. текст программы с ошибкой представлен ниже: program n1; var a: array [1..8] of integer; s, k: integer; beginfor k : = 1 to 8 do readln (a[k]); s : = 0; for k : =1 to 8 doif a (k) < 0 then s : = s + a[1]; writeln (s)endкаким окажется ответ после исполнения этой программы, если вчестве элементов массива будут введены числа 1,2, 3, 4, -1, -2, -3, -4? как исправить программу, чтобы она решала поставленную передпограммистом ? 20б
program l4 hooteg 5[3] doodle teen [g9-343;9] rees forth [¢75-21:64] common arrel has been loj 532+63:[67;32+(3-21)] у меня вышло такое, вроде как правильно.