Решить следующую задачу, используя рекурсивную подпрограмму
Очень надо, помогите пожалуйста
Приложения:
Ответы
Ответ дал:
0
function C(m,n:integer):integer;
begin
if (m=0)or(n=m) then C:=1
else C:=C(m,n-1)+C(m-1,n-1);
end;
var a,b:integer;
begin
readln(a,b);
writeln('C(',b,',',a,') = ',C(a,b));
end.
Пример:
5 10
C(10,5) = 252
begin
if (m=0)or(n=m) then C:=1
else C:=C(m,n-1)+C(m-1,n-1);
end;
var a,b:integer;
begin
readln(a,b);
writeln('C(',b,',',a,') = ',C(a,b));
end.
Пример:
5 10
C(10,5) = 252
Roma2041:
Извини, а на С++ сможешь написать?
Могу и на С++.
Можно пожалуйста на С++
Оформляйте задание.
Оформил задание https://znanija.com/task/28372592
Похожие вопросы
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад