Exponentiation with infix operators in (or operating on) the base: Difference between revisions

m
→‎{{header|ALGOL 68}}: Remove unnecessary ;
m (→‎{{header|R}}: Syntax highlighting.)
m (→‎{{header|ALGOL 68}}: Remove unnecessary ;)
Line 149:
print( ( " (-x)**p ", whole( (-x)**p, -4 ) ) );
print( ( " -(x**p) ", whole( -(x**p), -4 ) ) );
print( ( newline ) );
OD
OD
Line 160:
x = 5 p = 3 -x**p -125 -(x)**p -125 (-x)**p -125 -(x**p) -125
</pre>
 
=={{header|AWK}}==
<lang AWK>
3,021

edits