Задание 12 Параграф 9 ГДЗ Босова 11 класс (Информатика)
Решение #1
Рассмотрим вариант решения задания из учебника Босова, Босова 11 класс, Бином:
12. Напишите программу вычисления. Используйте подпрограмму.
Число сочетаний без повторений из n по k – это число способов, сколькими можно из различных n элементов выбрать k штук без учета порядка.
Подпрограмму-функцию можно сделать для вычисления факториала. Ее можно сделать двумя способами: с использованием рекурсии и без рекурсии.
С рекурсией
function F(m: integer): integer;
begin
if m = 0 then F := 1
else
F := F(m - 1) * m;
end;
var
n, k: integer;
C:real;
begin
writeln('Введите n и k через пробел, n>k ');
readln(n, k);
C := F(n) / (F(n - k) * F(k));
writeln('C=', C)
end.
Программа: Z_9_12_R.pas
(ссылка ниже)
Без рекурсии
function F(m: integer): integer;
var
i,fa: integer;
begin
fa:=1;
for i := 1 to m do
fa := fa * i;
F:=fa
end;
var
n, k: integer;
C: real;
begin
writeln('Введите n и k через пробел, n>k ');
readln(n, k);
C := F(n) / (F(n - k) * F(k));
writeln('C=', C)
end.
Программа: Z_9_12.pas
(ссылка ниже)
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением
