Написать цикл с предусловием. Вычислить А в степени N.
Написать цикл с предусловием. Вычислить А в степени N.
Гость
Ответ(ы) на вопрос:
Гостьvar
b: byte;
a: integer;
c: longint := 1;
begin
readln(a, b);
repeat
c *= a;
b -= 1;
until b = 0;
writeln(c);
end.
Не нашли ответ?
Похожие вопросы