Составьте программу вычисления выражения (разными способами, применяя каждый из операторов while,repeat,for) a^p, где p - целое число. Pascal / очень надо.

вы наверно поняли что a в степени p ?

ну да

а там иначе?

1)Это с помощью whilevar a,p,i,c:integer;begin  readln(a);  readln(p);  c:=1; i:=0;  while i<p do  begin    c:=c * a;    inc(i);  end;  writeln(c);  readln;end.2) Это с помощью repeatvar a,p,i,c:integer;begin  readln(a);  readln(p);  c:=1; i:=0;  repeat    c:=c * a;    inc(i);  until i=p;  writeln(c);  readln;end.3) Это с помощью forvar a,p,i,c:integer;begin  readln(a);  readln(p);  c:=1;  for i:=1 to p do    c:=c * a;  writeln(c);  readln;end.