Тут имеется один "подвох" и на него часто ловятся.Можно воспользоваться функций Power для возведения в степень 1/3, либо применить известную формулу

Но в обоих случаях используется (явно или скрыто) вычисление логарифма. А мы помним, что логарифм определен только для положительного аргумента.По заданию нужно найти кубический корень из a+b. И этот корень определен для любого вещественного числа, в отличии от логарифма.Вспоминаем:
![\displaystyle \sqrt [3]x=\left. \left\{\begin{matrix}
-\sqrt[3]{|x|}, &x\ \textless \ 0\\ 0, & x=0 \\ \sqrt [3]x, &x\ \textgreater \ 0 \end{matrix}ight.
ight| \qquad \sqrt [3]x=sign(x)\times\sqrt[3]{|x|} \displaystyle \sqrt [3]x=\left. \left\{\begin{matrix}
-\sqrt[3]{|x|}, &x\ \textless \ 0\\ 0, & x=0 \\ \sqrt [3]x, &x\ \textgreater \ 0 \end{matrix}ight.
ight| \qquad \sqrt [3]x=sign(x)\times\sqrt[3]{|x|}](https://tex.z-dn.net/?f=\displaystyle \sqrt [3]x=\left. \left\{\begin{matrix}
-\sqrt[3]{|x|}, &x\ \textless \ 0\\ 0, & x=0 \\ \sqrt [3]x, &x\ \textgreater \ 0 \end{matrix}ight.
ight| \qquad \sqrt [3]x=sign(x)\times\sqrt[3]{|x|})
И только теперь можно писать программу.
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016// Внимание! Если программа не работает, обновите версию!begin var a,b,c:real; Read(a,b); c:=a+b; Writeln(sign(c)*power(abs(c),1/3))end.
Примеры14.283 -32.17-2.6152457339082213.183 -13.1830