помогите пожалуйста сделать 24 номер

АБВГД+А=ДДДДДД
вот такая прога на VBA
Sub ppp()
кк = 1
For А = 0 To 9
For Б = 0 To 9
For В = 0 To 9
For Г = 0 To 9
For Д = 0 To 9
If А * 10000 + Б * 1000 + В * 100 + Г * 10 + Д + А = Д * 100000 + Д * 10000 + Д * 1000 + Д * 100 + Д * 10 + Д Then
Cells(кк, 1) = А * 10000 + Б * 1000 + В * 100 + Г * 10 + Д
Cells(кк, 2) = Д * 100000 + Д * 10000 + Д * 1000 + Д * 100 + Д * 10 + Д
кк = кк + 1
End If
Next Д
Next Г
Next В
Next Б
Next А
End Sub
показывает что в ответе все цифры 0
т. е. решения в разных цифрах НЕТ

ну и еще одно доказательство :
складывая с А число АБВГД мы должны получить 6-значное число, а оно может возникнуть только при 9999х отсюда получаем много 0 и старшую 1 а по условию должны получить в результате одинаковые цифры, что невозможно.