|
|
Факториал (рекурсия) целого числа
Function Factorial(n: byte): longint;
begin
if (n = 0) then Factorial := 1
else Factorial := n*Factorial(n-1);
end;
Источник: |
Категория: Задачки циклы и условия | Добавил: Seqular (11.11.2007)
| Автор: Дмитрий 
|
| Просмотров: 4775 | Комментарии: 2
| Рейтинг: 4.0/4 |
|
| Всего комментариев: 2 | |
|
2
Мужик
(21.03.2011 21:51)
0
а ми ідемо в профік їсти
|
1
Lex_87
(13.10.2010 03:45)
0
Спасибо ребята. Классно. Помогло =)
|
|
|
|
Добавлять комментарии могут только зарегистрированные пользователи. [ Регистрация | Вход ] |
|
| Статистика |
 |
|
