Здравствуйте, кто разбирается в информатике С клавиатуры вводится натуральное число, не превышающее 109. Вычислите и выведите на экран среднее арифметическое всех чётных цифр этого числа. Если чётных цифр нет, выведите Сообщение «Чётных цифр нет!». Пример: для числа 120459363 среднее арифметическое чётных цифр равно 3. 2-3. С клавиатуры вводится последовательность целых чисел. Окончанием последовательности является ввод числа ноль (сам ноль в обработке не участвует Определите наибольшее расстояние между значениями двух соседних членов этой последовательности. Пример: в последовательности «3 -5 -8 -9 2 4 -3 7 9 0» наибольшее расстояние между значениями двух соседних членов равно 11. ( В Паскале )

Программа на python 3, перебирающая все возможные последовательности определённой длины:
def shortest_chains(n):
  def next_chains(chain):
    new_elems = set()
    for i in range(len(chain)):
      for j in range(i, len(chain)):
        new_elem = chain[i] + chain[j]
        if new_elem > chain[-1] and new_elem not in new_elems:
          new_elems.add(new_elem)
          yield chain + [new_elem]
  
  current_stage = None
  next_stage = [[1]]
  answer = []
  while len(answer) == 0:
    current_stage = next_stage
    next_stage = []
    for chain in current_stage:
      next_stage.extend(next_chains(chain))
    answer = [chain[1:] for chain in next_stage if chain[-1] == n]
  return answer
    
def print_solution(n):
  answer = shortest_chains(n)
  print("Для {} есть {} решений(-я, -е):".format(n, len(answer)))
  for i in range(len(answer)):
    print("{}. {}".format(i + 1, " ".join(map(str, answer[i]
  print()

Запустив, можно получить все 5 возможных решений для числа 7, по 4 решения для 15 и 23 и 87 решений для 63.