Составить блок-схему и программу ** Паскале y=x^n

Question

Составить блок-схему и программу на Паскале y=x^n

Answer 1

Ответ:

var x, n, i, s:integer;

begin

   readln(x, n);

   s:=1;

   i:=0;

   while i < n do begin

     s:=s*x;

     i:=i+1;

   end;

   writeln(s);

end.

Comments

Спасибо большое

---

проверь -> просто*

---

Если хочешь проверь ровнее нарисовать блок схему (у меня немного криво нарисована так как я с "золотыми руками"). А программа работает идеально, ничего переделывать не надо

---

Да

---

это точный ответ?