Используя Рекурсивную функцию вычислить 3^(9) три девятой степени только с полным кодом.

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

Используя Рекурсивную функцию вычислить 3^(9) три девятой степени только с полным кодом.


Информатика (48 баллов) | 48 просмотров
0

и кокойжи язык програмерования аа

0

Pascal

Дан 1 ответ
0 голосов

{
написано на PascalABC.NET но должно работать во всех Паскалях.
Скриншот результата в приложении
}

PROGRAM power_recursive;
var
n,p:word;

function power(num:word; pow:byte):word;
begin
if (pow<2) then<br> power:=num
else
power:=num*power(num, pow-1);
end;

BEGIN
write('Введите основание степени : '); readln(n);
write('Введите показатель степени >0 : '); readln(p);
writeln( power(n,p) )
END.


image
(10.8k баллов)