N и k вводятся с клавиатуры. найти (n+k+1)!/3*n*k

N и k вводятся с клавиатуры. найти (n+k+1)!/3*n*k
Гость
Ответ(ы) на вопрос:
Гость
Program prog; Uses crt; var i, k, n: integer;     f: longint; begin clrscr; write('n = '); readln(n); write('k = '); readln(k); f:=1; for i:= 2 to (n+k+1) do f:=f*i; writeln('Res = ', f/(3*n*k):0:3); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы