Pascal ABC.
Найти сумму цифр числа, больших 5
Помогите, пожалуйста

Спасибо большое:))

program name;var a,b,c:integer;beginreadln(a,b,c);writeln('Сумма введённых чисел:', a+b+c);end.Эта программа подсчитывает сумму трёх введёных чисел.program name;var a,b,c:integer;beginreadln(a,b,c);if a+b+c>5 thenwriteln('Сумма введённых чисел:', a+b+c)elsewriteln('Сумма чисел должна быть больше пяти!');end.А эта программа складывает только те числа, которые в сумме дают больше 5. Выбирай, какой больше подходит