function f(n:integer):integer;
begin if n>1 then f:=n*f(n-1) else f:=1 end;
Факториал числа в TPx
привет я новичок! Подскажите кто знает кто открыл факториал! И если можно програму для n-го факториала!
в каком смысле открыл ))))))))))))))
взял и открыл )))
ну а функцию я бы так сделал
Код:
тема обсуждалась на форуме[COLOR=red], перед созданием темы надо пользоваться Поиском - подробности в Правилах форума Паскаль.тема закрыта. [/COLOR]
все неразрешенные вопросы - в поисковик(www.google.ru).
все неразрешенные вопросы - в поисковик(www.google.ru).