// PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018 // Внимание! Если программа не работает, обновите версию!
begin var a:=ReadlnString('Введите натуральное число a:').ToBigInteger; var n:=ReadInteger('Введите показатель степени n:'); Writeln('a^n = ',a**n) end.
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnString('Введите натуральное число a:').ToBigInteger;
var n:=ReadInteger('Введите показатель степени n:');
Writeln('a^n = ',a**n)
end.