Напишите программу которая вводит натуральные числа a и n и вычисляет a^n без использования операции возведения в степень.
Напишите программу которая вводит натуральные числа a и n и вычисляет a^n без использования операции возведения в степень.
Ответ(ы) на вопрос:
var a, n, i: integer;
r: longint;
begin
r := 1;
readln(a, n);
for i := 1 to n do
r := r * a;
write(r);
end.
Не нашли ответ?
Похожие вопросы