Регистрация
Ivanova567
06.04.2023 15:46
Информатика
Есть ответ 👍

Укажите полные имена файлов masha.txt. ivanov.doc. pasha.doc

235
399
Посмотреть ответы 2

Ответы на вопрос:

Fin208
Fin208
4,5(45 оценок)
Maria.txt ivan.doc pavel.doc )?
kristina1333313
kristina1333313
4,8(70 оценок)
{переменные: n - количество чисел; i - переменная цикла; x - очередное число; sum - сумма отрицательных чисел. } program primer_1; var i,n,x,sum: integer; begin writeln('введите длину последовательности n= '); readln(n); sum: =0; for i: =1 to n do begin writeln('введите ', i, '-ое число: '); readln(x); if x < 0 then sum: =sum+x end; if sum = 0 then writeln('отрицательных чисел нет.') else writeln('сумма отрицательных чисел = ', sum); end.

Популярно: Информатика