С,в паскале найти максимальное целое число ,куб которого не превышает 55000

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(Trunc(Power(55000,1/3)))
end.

Результат
38