• напиши рекурсивную подпрограмму , которая вычисляет сумму S(n)=1+3+5+...+(2n-1)

Ответы 2

  • Но при первом вызове подпрограммы второй параметр должен быть обязательно равен 0
  • procedure s(n,ans:integer);beginif n<>0 then beginans:=ans+n+n-1;s(n-1,ans);endelsewriteln(ans);end;Вот пример всем программыprogram znanijatop;const null = 0;procedure s(n,ans:integer);beginif n<>0 then beginans:=ans+n+n-1;s(n-1,ans);endelsewriteln(ans);end;var n:integer;beginwriteln('vvedite n');readln(n);s(n,null);end.
    • Автор:

      tootsie
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years