Составьте программу которая находит сумму 2 чисел на паскале. и чтобы программа повторялась каждый раз без перезапуска (цикл)

Program calc;
var
a, b, c : real;
begin
repeat
writeln("Введите 2 числа:");
readln(a, b);
c := a + b;
writeln("Сумма: ", c);
until false;
end.