задача по факториалу, помогите или подскажите Опции

[Ostin]

Разработать алгоритм и программу вычисления числа сочетаний, используя формулу:


.m .... n!
C =------------ Точки это типа пробелы (.)
.n .m!(n-m)!

n,m вводится пользователем (0<n , m<=10).





Плиз помогите как можно быстрей, задача нужна очень срочно!!!!!!

зарание спасибо

Сообщение отредактировано: Ostin - 26.12.2005 18:42

[volvo]

Внимательно читай мою подпись и сходи по ВСЕМ ссылкам, в ней содержащимся...

+ здесь: FAQ: Комбинаторика

[Ostin]

Наконец то я её решил но теперь такой вопрос возник!!!!!!
что такое средства отладки интегрированной среды программирования и чем различается F7 от F8&.

program stas2;
{$i-}
uses crt;
 var
 m,n:integer;
 r,s,p,q:integer;
 i:integer;
 c:real;
 ch:char;
 begin
 repeat
 clrscr;
 repeat
 writeln ('vvidite n');
 readln (n);
 until (ioresult=0) and (0<n);
 s:=1;
 For i:=1 to n do
 s:=s*i;
 repeat
writeln ('vvidite m');
readln (m);
until (ioresult=0) and (m<=10);
i:=1;
p:=1;
for i:=1 to m do
P:=p*i;
clrscr;
q:=1;
i:=1;
for i:= 1 to n-m do
q:=q*i;
c:=s/(p*q);
writeln ('rezultat c=',c:3:5);
writeln ('Vi hotite nachat  zanovo? Y/N');
repeat
ch:=readkey;
until (ch='y') or (ch='Y') or (ch='n') or (ch='N');
Until (ch='n') or (ch='N');
end.

Пользуемся тегами !

Сообщение отредактировано: volvo - 7.11.2006 17:37

[volvo]

Если при отладке встречается процедура/функция, то F7 войдет внутрь и даст тебе возможность пошагово пройти все statements внутри подпрограммы, F8 - сразу выполнит всю подпрограмму, не заходя в нее...