А. Найдите ошибки и запишите значение переменной s, полученное в
результате работы следующей программы.
var s,k: integer;
s := 0;
for n := 4 to 7 do
s := s + 8;
writeln(s);
end.
ответ:
Задание 2
Вводится последовательность из А целых чисел Найти сумму всех
отрицательных чисел.