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

{написано на PascalABC.NET но должно работать во всех Паскалях.Скриншот результата в приложении}PROGRAM power_recursive;var n,p:word;function power(num:word; pow:byte):word;begin if (pow<2) then power:=num else power:=num*power(num, pow-1);end;BEGIN write('Введите основание степени : '); readln(n); write('Введите показатель степени >0 : '); readln(p); writeln( power(n,p) )END.