![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
![]()
какая функция отвечает за это?
дык!
|
![]() |
![]() |
![]() |
#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.: можно и через рекурсию ![]() |
![]() |
![]() |
![]() |
#3 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
![]()
А где здесь сама степень факториала (Если имеется вид n! то - n)?
дык!
|
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 01.12.2006
Сообщений: 241
|
![]()
После внесения данной функции в програму, потом просто вызываешь ее и передаешь ей число факториал которого надо найти
для данного случая команда Код:
Програмисты - единственные люди, которым платят за исправления их же ошибок
![]() |
![]() |
![]() |
![]() |
#5 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
![]()
У меня не получилось!
Даю скрин...
дык!
|
![]() |
![]() |
![]() |
#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; |
![]() |
![]() |
![]() |
#7 |
Форумчанин Подтвердите свой е-майл
Регистрация: 18.11.2006
Сообщений: 172
|
![]()
Не хотят согласоваваться типы! Я перевёл x на integer и пробовал
Код:
дык!
|
![]() |
![]() |
![]() |
#8 |
Android Developer
Старожил Подтвердите свой е-майл
Регистрация: 19.02.2007
Сообщений: 3,708
|
![]()
Edit2.Text := Faktorial(Word(StrtoInt(Edit1.Text) )); думаю получится
![]() |
![]() |
![]() |
![]() |
#9 | |
Форумчанин
Регистрация: 10.11.2006
Сообщений: 189
|
![]()
А значение факториала к текстовому типу тоже нужно приводить:
Цитата:
|
|
![]() |
![]() |
![]() |
#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 |