Автор Й й задал вопрос в разделе Другие языки и технологии
Помогите Pascal ABC (рекурсия) и получил лучший ответ
Ответ от [гуру]
и чем вам помочь? учебник читайте. если в нем нет нужного с образцами кода - требуйте у преподов нормальный учебник
Ответ от Pool[гуру]
function ret(n, i:integer):real;
var r:real;
begin
r:=sqrt(1+n+i);
if i<30000 then r:=r*ret(n, i+1);
ret:=r;
end;
function ret(n, i:integer):real;
var r:real;
begin
r:=sqrt(1+n+i);
if i<30000 then r:=r*ret(n, i+1);
ret:=r;
end;
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Помогите Pascal ABC (рекурсия)