Поделитесь своими знаниями, ответьте на вопрос:
Пользователь вводит целые числа. Пока он не введёт число большее 1717, в ответ на каждое введённое число выводите сумму этого числа и числа 88, если же введённое число больше 1717, то цикл необходимо завершить.
x:=0;
repeat
begin
readln(x);
writeln(x+88);
end;
until x<1718;