Question

Дано целое число X и натуральное N. Составьте алгоритм вычисления X в степени N .Проверьте алгоритм трассировкой. Напишите программу на Паскале.
ЧЕРЕЗ WHILE DO!!!!!!!!!

Answer 1

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
var (x,n):=ReadInteger2('x,n =');
var ans :=1;
while (n > 0)do
begin
ans*=x; dec(n);
end;
Writeln(ans);
end.

Пример:
x,n = 2 10
1024

Answer 2

Решение вашей задачи. Вначале число, а потом степень