Задача вычислить сумму чисел в Паскале. Т.е. найти сумму n вводимых пользователем чисел до тех пор, пока не будет

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

Итак, решение:

program ex42;
uses crt;
var
x,s:integer;
begin
clrscr;
s:=0;
repeat
write('введите элемент последовательности: ');
readln(x);
s:=s+x;
until x=0;
writeln('сумма последовательности = ',s);
readln;
end.