1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программировании. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление

Функция Аккермана

Тема в разделе "Свободное общение", создана пользователем ISMD, 16 апр 2006.

Статус темы:
Закрыта.
  1. ISMD

    ISMD Гость

    Репутация:
    0
    Нужны два варианта решения: рекурсивный и итерационный.

    1. Рекусия уже написана но очень быстро переполняется стек. Подкиньте идею оптимизации.

    2. Нужно решение итерационное с помощью имитации стека массивом записей.

    Код:
    function Acc(n,m : word): word;
    begin
    if (n=0) then Acc:=m+1 else
    begin
    if (n<>0)and(m=0) then Acc:=Acc(n-1,1);
    if (n<>0)and(m<>0) then Acc:=Acc(n-1,Acc(n,m-1));
    end;
    [CODE/]
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей