Составить программу по этой блок-схеме в Паскаль

Question

Составить программу по этой блок-схеме в Паскаль

---

Answer 1

Решение ниже для данной задачи

Comments

program HelloWorld;

var

n, i : integer;
a,y : real;

begin

readln(a,n);

y:=1;
i:=1;

while i<=n do<br>begin
y:=y*a;
i:=i+1;
end;

writeln(y);

end.