Program PR1;uses crt;var a,b:real;beginclrscr;writeln('Vvedite chislo i stepen');readln(a,b);writeln(exp(a*ln(b)));end.
vara,b,i,s:integer;beginreadln(a);readln(b);s:=a;
for i:=2 to b dos:=s*a;writeln (s);end.
