Question

Дано N произвольных чисел найти сумму положительных чисел в одну перемену и сумму отрицательных чисел в другую. Пожалуйста помогите! Решать программу '' пока''. Заранее спасибо

Answer 1

Program example;
var plus, minus, n, a, i: integer;
begin
plus := 0;
minus := 0;
writeln('Введите кол-во чисел.');
readln(n) ;
for i := 1 to n do
begin
writeln('Введите число');
readln(a);
if a > 0 then plus := plus + a
else minus := minus + a;
end;
writeln(plus);
writeln(minus);
end.

Answer 2

Добро пожаловать! Я рад помочь вам решить эту задачу. Для того чтобы решить программу, вам потребуется воспользоваться циклом, который будет выполняться до тех пор, пока пользователь будет вводить числа. Когда пользователь введет специальное значение (например, 0), цикл закончится, и программа выведет сумму положительных и отрицательных чисел.

Давайте представим, что пользователь вводит числа одно за другим. Если число положительное, оно будет прибавлено к сумме положительных чисел, если отрицательное - к сумме отрицательных чисел. Если пользователь введет 0, программа завершит ввод чисел и выведет результаты.

Ниже приведен пример решения на языке Python:

pythonCopy code
def main():
    sum_positive = 0
    sum_negative = 0

    while True:
        try:
            num = float(input("Введите число (для завершения введите 0): "))
            if num == 0:
                break
            elif num > 0:
                sum_positive += num
            else:
                sum_negative += num
        except ValueError:
            print("Ошибка! Введите корректное число.")

    print(f"Сумма положительных чисел: {sum_positive}")
    print(f"Сумма отрицательных чисел: {sum_negative}")

if __name__ == "__main__":
    main()

Вы можете запустить этот код на своем компьютере и вводить произвольные числа. Программа завершится, когда вы введете 0, и вы увидите суммы положительных и отрицательных чисел.

Надеюсь, это поможет вам решить задачу! Если у вас возникнут еще вопросы, не стесняйтесь спрашивать. Удачи!