Информатика: составить программу вывода на экран суммы чисел больших 30 введенных с клавиатуры паскаль

Программа на языке Паскаль для вывода на экран суммы чисел, больших 30, введенных с клавиатуры:

program Summation;

var
  inputValue, sum: Integer;

begin
  sum := 0;

  repeat
    write('Введите число: ');
    readln(inputValue);
    
    if inputValue > 30 then
      sum := sum + inputValue;
  until inputValue = 0;

  writeln('Сумма чисел больше 30:', sum);
end.

Необходимо вводить числа и нажимать Enter. Когда вы хотите закончить ввод, введите 0 (ноль). Программа выводит на экран сумму всех чисел, больше 30.