/* exp.b */ define x (x, y) { auto z, i z=1 for (i=1; i<=y; i++) { z=(z*x) } return (z) } "Per calcolare l'elevamento a potenza, si utilizzi la funzione x (x, y): "