This BCX code,

DIM cum#[1000]

DIM tcont, pd#

tcont = 1

cum#[tcont] = 17

pd# = 2

PRINT (cum#[tcont] ^ (1 / ((tcont + 1) / pd#)) - 1) * 100

PRINT 7 ^ (MOD(13, 7))

PRINT (SIN(13)) ^ (SIN(13))

PRINT pd ^ (pd ^ 2)

PRINT pd ^ pd

PRINT 7 ^ (IMOD(3,2))

PRINT POW(2, POW(2, POW(2, 2)))

PRINT 2 ^ (2 ^ (2 ^ (2)))

PRINT pd ^ pd - pd ^ (LOG(pd)) - (SIN(pd)) ^ 7

back in the day when things were right proper, would translate, in part, to this

printf("% .15G\n",(double)(pow(cum[tcont],(1/((tcont+1)/pd)))-1)*100);

printf("% .15G\n",(double)pow(7,(fmod(13,7))));

printf("% .15G\n",(double)pow((sin(13)),(sin(13))));

printf("% .15G\n",(double)pow(pd,(pow(pd,2))));

printf("% .15G\n",(double)pow(pd,pd));

printf("% .15G\n",(double)pow(7,(imod(3,2))));

printf("% .15G\n",(double)pow(2,pow(2,pow(2,2))));

printf("% .15G\n",(double)pow(2,(pow(2,(pow(2,(2)))))));

printf("% .15G\n",(double)pow(pd,pd)-pow(pd,(log(pd)))-pow((sin(pd)),7));

Now, since BCX 6.8.0 there is this

printf("% .15G\n",(double)( pow ( cum [ tcont ] , ( 1 / ( ( tcont + 1) / pd))) - 1)*100);

printf("% .15G\n",(double)pow( 7 , ( fmod ( 13 , 7))));

printf("% .15G\n",(double)pow( ( sin ( 13)) , ( sin ( 13))));

printf("% .15G\n",(double)pow( pd , ( pow ( pd , 2))));

printf("% .15G\n",(double)pow( pd , pd));

printf("% .15G\n",(double)pow( 7 , ( imod ( 3 , 2))));

printf("% .15G\n",(double)pow( 2 , pow ( 2 , pow ( 2 , 2))));

printf("% .15G\n",(double)pow( 2 , ( pow ( 2 , ( pow ( 2 , ( 2)))))));

printf("% .15G\n",(double)pow( pd , pd)-pow( pd , ( log ( pd)))-pow( ( sin ( pd)) , 7));