Составьте программу для возведения в n-ую степень каждого числа 10-ти элементного массива. степень запросите с клавиатуры. по окончании работы программы, на экране должен быть отображён исходный массив и массив с возведёнными в n-ую степень числами.
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016 begin var a:=ArrRandom(10,1,20).Select(x->BigInteger(x)); a.Println; var n:=ReadInteger('Показатель степени='); a:=a.Select(x->Power(x,n)).Println end.
begin
var a:=ArrRandom(10,1,20).Select(x->BigInteger(x));
a.Println;
var n:=ReadInteger('Показатель степени=');
a:=a.Select(x->Power(x,n)).Println
end.
Тестовое решение:
5 15 15 2 18 5 2 17 15 11
Показатель степени= 13
1220703125 1946195068359375 1946195068359375 8192 20822964865671168 1220703125 8192 9904578032905937 1946195068359375 34522712143931