Домнин
4 год назад
Напишите программу, которая возводит натуральное число A в натуральную степень B .Входные данныеВходная строка содержит два числа, A и B , разделённые пробелом. Гарантируется, что 1 ≤ A , B ≤ 1000 .Выходные данныеПрограмма должна вывести одно число: A в степени B .Примерывходные данные2 6выходные данные64.Паскаль ABC 1.8
ОТВЕТЫ
Craig Joshua
Oct 24, 2020
Program n1;
procedure st(n:longint; k: integer );
var i,m : longint;
begin
m:=n;
for i:=1 to k-1 do n:=n*m; writeln(n);
end;
var a,b: integer;
begin
readln(a,b);
if (a>=1) and (b<=1000) then st(a,b);
end.
procedure st(n:longint; k: integer );
var i,m : longint;
begin
m:=n;
for i:=1 to k-1 do n:=n*m; writeln(n);
end;
var a,b: integer;
begin
readln(a,b);
if (a>=1) and (b<=1000) then st(a,b);
end.
344
Смежные вопросы:
