Составьте программу вычисления суммы отрицательных элементов в массиве A[1..10]. + сделать чтобы это с .txt файла вводилось. Я не знаю как, но тема задания "Работа с текстовыми файлами".
Какой язык программирования?
забыл указать. Паскаль
Var i,k,s: integer; f: text; begin assign(f,'c.txt'); reset(f); s:=0; for i:=1 to 10 do begin read(f,k); write(k,' '); if k<0 then s:=s+k;<br> end; close(f); writeln; writeln('сумма отрицательных: ',s); end. Файл c.txt во вложении.