Зертханалық жұмыс

:=0; :=1;

{b=aвдеңгейіk}

while k <> n do begin

|k:=k+1;

|b:=b*a;