|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
19.03.2007, 19:31 | #1 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
Вычисление факториала числа
какая функция отвечает за это?
дык!
|
19.03.2007, 19:48 | #2 |
Delphi/C++/C#
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,972
|
Должно работать
Function Facktorial(x:word):integer; var i:integer; begin Facktorial:=1; for i:=1 to x do Facktorial:=Facktorial*i; end; P.S.: можно и через рекурсию |
19.03.2007, 19:53 | #3 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
А где здесь сама степень факториала (Если имеется вид n! то - n)?
дык!
|
19.03.2007, 20:00 | #4 |
Форумчанин
Регистрация: 01.12.2006
Сообщений: 241
|
После внесения данной функции в програму, потом просто вызываешь ее и передаешь ей число факториал которого надо найти
для данного случая команда Код:
Програмисты - единственные люди, которым платят за исправления их же ошибок
|
19.03.2007, 21:23 | #5 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
У меня не получилось!
Даю скрин...
дык!
|
19.03.2007, 22:49 | #6 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
Function Facktorial(x: word): integer;
var i: integer; begin Result:=1; for i:=1 to x do Result:=Result*i; end; |
20.03.2007, 06:31 | #7 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
Не хотят согласоваваться типы! Я перевёл x на integer и пробовал
Код:
дык!
|
20.03.2007, 08:11 | #8 |
Android Developer
Старожил Подтвердите свой е-майл
Регистрация: 19.02.2007
Сообщений: 3,708
|
Edit2.Text := Faktorial(Word(StrtoInt(Edit1.Text) )); думаю получится
|
20.03.2007, 09:59 | #9 | |
Форумчанин
Регистрация: 10.11.2006
Сообщений: 189
|
А значение факториала к текстовому типу тоже нужно приводить:
Цитата:
|
|
20.03.2007, 10:48 | #10 |
Delphi/C++/C#
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,972
|
мда... вроде бы задачка 9 класса.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
последняя ненулевая цифра факториала | Пашка | Помощь студентам | 6 | 04.04.2008 23:39 |
подскажите на счет факториала | Lindemm | Помощь студентам | 4 | 26.03.2008 21:47 |
ДАНЫ 4 ЧИСЛА X Y Z W составит программу найти произведение все положительные нечетные числа | Woland-itn | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 23.03.2008 21:49 |
Вычисление интреграла | Kiedis | Помощь студентам | 19 | 23.05.2007 19:41 |
Вычисление Exp | Mickle | Общие вопросы Delphi | 1 | 26.04.2007 09:34 |