TrikName, еспи а и б изначально больше нуля то условия и модули ненужны:
cls
input a -число
input b -степень
c=1
for i=0 to b
c=c*a
next i
print c

типа:
cls
input a
input b -степень
c=mod(b) -степень в модуле
d=1
for i=0 to b
d=d*a
next i
if b>0 then e=d else{
if bчотное то e=d else e=-d}}}-вычисляем какой знак ставить перед результатом, если степень >0 то плюс, если меньше нуля и чётная то тоже плюс, если меньше нуля и нечётная то минус (если а больше нуля)
print e