[PASCAL] Non capisco dov'è l'errore

[MacApp]

for i:=1 to esponente do
			x:=x*base;

EDIT: ok non avevo visto che già ti avevano risposto ;-)