[PASCAL] Non capisco dov'è l'errore

[Ricky_13]

comunque che casino per risolvere una potenza!
io avrei fatto così! (ora mi sembra facile, ma mi hanno dovuto corregere parecchie volte)

PROGRAM potenza;
USES crt;
VAR a,b,c,i:INTEGER;
BEGIN
WRITELN(' Inserisci un numero ');
READLN(A);
WRITELN(' Inserisci esponente ');
READLN(B);
c:=1;
FOR I:= 1 TO b DO
begin
c:=c*a;
end;
WRITELN(' Il risultato della potenza è ' ,c);
READLN;
END.

comunque bel lavoro lo stesso..ciao