ПОМОГИТЕ! Дано целое число Х и натуральное N.Составьте алгоритм вычисления X в N...

0 голосов
116 просмотров

ПОМОГИТЕ! Дано целое число Х и натуральное N.Составьте алгоритм вычисления X в N степени.Прооверьте алгоритм трассировкой.Напишите программу на языке Паскаль.


Информатика (17 баллов) | 116 просмотров
Дан 1 ответ
0 голосов

Если числа небольшие и 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.  

(56 баллов)