Паскаль помогите пожалуйста

Паскаль помогите пожалуйста
Ограничение времени: 1 с
Ограничение памяти: 64 M

На стандартном потоке ввода задаётся последовательность целых чисел. Каждое число последовательности не меньше -20000000 и не больше 20000000. Всего последовательность состоит не более чем из 40 чисел. Последовательность завершается признаком конца ввода. На стандартный поток вывода напечатайте сумму этих чисел.

Примеры

Входные данные Результат работы
1 2 3 4 10

без N

  • Используйте цикл while и считывайте числа и суммируйте.
  • на си ++ примерно вот так
  • В 1642 году Блез Паскаль изобрел Сумирующую машину которая могла только складывать многозначные числа
  • #include

    using namespace std;

    int main() {
    int v, s = 0;
    while (cin >> v) s += v;
    cout < < s << endl;
    return 0;
    }