1. составить программу, которая будет находить аb, то есть b-ю степень числа а, где а и в - это целые числа и в> 0, вводимые с клавиатуры.

Var a,b,i,c : integer;
begin
writeln('vvedite A');
readln(a);
writeln('vvedite B');
readln(b);
c:=1;
for i:=1 to b do
c:=c*a;
writeln('Otvet:',c)
end.