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

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