Первый член последовательности равен 36. каждый последующий вычисляется из предыдущего как сумма кубов всех его цифр. второй член последовательности равен 27_216=243. Чему равен 127-ой член?

Программа на языке PascalABC.Net: var   sPred,sSucc,i,d:integer; begin   sPred:=36;   for i:=2 to 127 do   begin     sSucc:=0;     while sPred>0 do begin       d:=sPred mod 10;       sSucc:=sSucc+d*sqr(d);       sPred:=sPred div 10     end;     sPred:=sSucc   end;   Writeln(sSucc) end. Результат выполнения программы: 153