Информатика задача паскаль

паскакаль

program find_two_digit_number; var a, b: integer; begin for b := 9 to 99 do begin a := 8 * b div 9; if (a >= 10) and (a + b + (a * a * a + b * b * b) = (b * 10 + a)) then begin writeln('Число: ', a * 10 + b); break; end; end; end.