Решение олимпиадных задач по информатике: Треугольник из палочек

Сегодня решаем олимпиадную задачу по информатике школьного этапа 2022 года. Задача: "Треугольник из палочек". 9 - 11 класс.

a, b, c = int(input()), int(input()), int(input())
count = 0
while a + b != c and a + c != b and b + c != a:
    count += 1
    a -= 1
    b -= 1
    c -= 1

print(count)

var
  a, b, c, count: integer;
  
begin
  readln(a);
  readln(b);
  readln(c);
  while (a + b <> c) and (a + c <> b) and (b + c <> a) do
  begin
    count := count + 1;
    a := a - 1;
    b := b - 1;
    c := c - 1;
  end;
  writeln(count);
end.