Написать программу вычисления величины


B = m(m-1)(m-2) … (m-(n-1))
,

где
m, n заданы
(m>n, m,n – натуральны
числа).

VAR
   n, m, ans, i: UInt64;
BEGIN
   Read(m, n);

   ans := m;
   For i := 1 to (n-1) do
      ans := ans*(m - i);

   Write(ans);
END.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.