Question

Написать программу для нахождения суммы отрицательных чисел некоторой последовательности из N целых чисел.

Answer 1

Паскаль.

var

 N, x, i, sum : integer;

begin

 readln(N);

 sum := 0;

 for i:=1 to N do begin

   readln(x);

   if x<0 then sum := sum + x;

 end;

 writeln(sum);

end.

Answer 2

Конечно! Вот пример программы на языке Python, которая находит сумму отрицательных чисел в заданной последовательности из N целых чисел:

pythonCopy code
def find_negative_sum(sequence):
    negative_sum = 0
    for number in sequence:
        if number < 0:
            negative_sum += number
    return negative_sum

# Пример использования:
N = int(input("Введите количество чисел в последовательности: "))
sequence = []
for i in range(N):
    number = int(input(f"Введите число {i+1}: "))
    sequence.append(number)

sum_of_negatives = find_negative_sum(sequence)
print("Сумма отрицательных чисел:", sum_of_negatives)

Программа запрашивает у пользователя количество чисел в последовательности (N), затем последовательно запрашивает каждое число и сохраняет его в списке sequence. Функция find_negative_sum принимает эту последовательность и вычисляет сумму всех отрицательных чисел. Результат выводится на экран.

Вы можете запустить эту программу и ввести желаемые числа, чтобы найти сумму отрицательных чисел в заданной последовательности.