Question

Напишите программу для решения следующей задачи: с клавиатуры последовательно вводится 50 целых чисел,определить их сумму.

Answer 1

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('Сумма введенных ',ReadSeqInteger('Вводите:',50).Sum)
end.

Пример
Вводите: 45 52 92 -47 -51 -66 14 27 57 20 27 -78 18 -53 -53 -90 74 -47 86 -89 3 52 -61 3 1 47 -46 -100 -91 -17 51 -89 49 58 62 3 6 -59 82 24 55 30 -79 -70 -97 12 -41 -44 100 -22
Сумма введенных -240

Answer 2

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

Вот пример программы на языке Python, решающей данную задачу:

# инициализация переменной для хранения суммы
sum = 0

# цикл для считывания 50 чисел
for i in range(50):
    # считываем число с клавиатуры
    num = int(input("Введите число: "))
    
    # добавляем считанное число к сумме
    sum += num

# выводим полученную сумму
print("Сумма чисел:", sum)

При запуске данной программы, она будет последовательно запрашивать у пользователя ввод 50 чисел. После ввода всех чисел, программа выведет их сумму.

Пример работы программы:

Введите число: 5
Введите число: 10
Введите число: -3
...
Введите число: 2
Сумма чисел: 100

Таким образом, программа решает поставленную задачу - находит сумму 50 целых чисел, введенных с клавиатуры.