Что имеют в виду, когда говорят “аппаратное обеспечение”?

сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.

если числа небольшие и x в n степени умещается в longint, то можно в цикле от 1 до n умножать на x

var i,x,n: integer;

l: longint;

begin

readln(x,n);  

l: =1;  

for i: =1 to n do

l: =l*x;

write(l);

end.