Рекурсивные вычисления. Паскаль.

[katris]

Здравствуйте!..
У меня вот такое задание:Запрограммировать рекурсивный алгоритм вычисления числа сочетаний C 8 по 5.

Я, вроде, написала всё, как объясняли, но почему-то программа не работает... Не могли бы вы подсказать, в чём ошибка?..

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

function C(n,k:byte):longint;
begin
   if (k=1) or (k=n)then C:=n-k+1
   else C:=C(n-1,k)+C(n-1,k-1);
   end;

   begin

   write('C=',C(8,5));
   writeln;
end.

[Скандербег]

А как определялось, что программа не работает?
Этот код показывает результат "С=56". Т.е. программа "работает", другой вопрос правильно или нет.

[Alex_FF]

Число сочетаний из 8 элементов по 5 равно 8 факториал поделить на 5 факториал и на (8 - 5) факториал, что равно 56. Где ошибка?

[LeBron]

Наверно, как всегда в случае сутдентов/новичков - делаем под фри или любой другой досовский компилятор, потом не дописываем задержку в конце, потом думаем, "почему оно не работает". ТС,

readln;

в конце помогло?
Если нет, то можно узнать точнее, что именно "не работает"? Сама программа вроде бы написана не глупо, вполне нормльный код.

[Serge_Bliznykov]

бинго!! уверен, что LeBron попал в точку!!!

"не работает" - "это закрывается, а результат не видно"