) Дана последовательность чисел Стирлинга. Числа Стирлинга S(n,k) определены для 0≤k≤n и удовлетворяют следующим соотношениям: S(0,0)=1, S(n,0)=0 для n больше 0, S(n,n)=1 для n больше 0, Иначе S(n,k)=k*S(n-1,k)+S(n-1,k-1). Для ...
) Дана последовательность чисел Стирлинга. Числа Стирлинга S(n,k) определены для 0≤k≤n и удовлетворяют следующим соотношениям:
S(0,0)=1,
S(n,0)=0 для n>0,
S(n,n)=1 для n>0,
Иначе S(n,k)=k*S(n-1,k)+S(n-1,k-1).
Для n=15, k=13 найти и вывести число Стирлинга S(n,k).
Гость
Ответ(ы) на вопрос:
Гостьfunction ster(n,k:integer):integer;
begin
if k=0 then
if n=0 then ster:=1
else ster:=0
else if n=k then
ster:=1
else ster:=k*ster(n-1,k)+ster(n-1,k-1)
end;
begin
writeln(ster(15,13));
end.
Не нашли ответ?
Похожие вопросы