Cordandis
6 год назад
Напишите программу которая вводит натуральные числа a и n и вычисляет a^n без использования операции возведения в степень.
ОТВЕТЫ
Mihaylovich
Jul 26, 2019
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.
r: longint;
begin
r := 1;
readln(a, n);
for i := 1 to n do
r := r * a;
write(r);
end.
144
Смежные вопросы:
