Решить систему уравнений с помощью рекурсии - Turbo Pascal

Формулировка задачи:

Доброго времени суток! Помогите пожалуйста решить систему с помощью рекурсии. (Паскаль)

Код к задаче: «Решить систему уравнений с помощью рекурсии - Turbo Pascal»

textual
function Step(x:real;n:integer):real;
begin
if n=0 then Step:=1
else if n>0 then Step:=Step(x,n-1)*x
else Step:=Step(x,n+1)/x;
end;

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

7   голосов, оценка 4.143 из 5


СОХРАНИТЬ ССЫЛКУ