Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Факториал произвольного целого числа Не могу посчитать факториал больше 20, с чем это может быть связанно? подскажите пожалуйста program Project1; {$APPTYPE CONSOLE} uses SysUtils, Math; var P,U:integer; https://www.cyberforum.ru/ delphi-beginners/ thread420356.html Delphi Рандом всегда повторяется, что делать?
Сделал игру на отгадывание числа, но вот проблема, рандом всегда повторяется, то есть при каждом запуске программы загадывается одно и тоже значение x:=random(11)... что с этим делать?
Delphi Как отправить почту? Всем привет. Есть один сайт левый, тестирующий решения олимпиадных заданий. Там одна задача интересная, при решении набираю всего 26 баллов, вот хотелось бы узнать варианты тестов. Сервер явно левый, недавно поднятый, так-что я думаю что такая дыра там открыта. Из-за того что программа пишется в консоли, библиотекой indy не воспользуешься (или можно и так, я в этом не специалист), скорее всего... https://www.cyberforum.ru/ delphi-beginners/ thread420318.html Delphi Компоненты выбора https://www.cyberforum.ru/ delphi-beginners/ thread420303.html
Помогите с задачей. Нужно: Составьте программу для расчета потребности в краске. Опишите процедуру нажатия кнопки Вычислить. Вот подсказка. Алгоритм такой: Записать в вещественные переменные значения, взятые из полей. Перевести граммы в килограммы (тупо разделить на 1000). Умножить площадь на кол-во кг краски на 1 м кв. Если стоит флажок "двойное покрытие", то удвоить результат,...
Delphi Дано натуральное N. Вычислить...
Delphi Определить k – количество трехзначных натуральных чисел, сумма цифр которых равна n (1≤n≥27). Операции деления не использовать. https://www.cyberforum.ru/ delphi-beginners/ thread420278.html
Delphi Timer в цикле https://www.cyberforum.ru/ delphi-beginners/ thread420269.html
Нужно реализовать анимацию снаряда. Т.е прорисовывается снаряд (черный круг) в одной координате, затем через 30 милисекунд (к примеру) закрашивается, потом также со следщей координатой. Преподаватель посоветовал использовать таймер. Но что-то не получатся - оброботчик таймера срабатывает всего 1 раз. Мой текст программы: For i:=1 to _PointOfTheTrack do // Цикл генерации и прорисовки...
Delphi memo строка вниз
Привет всем помогите пожалуйста как в мемо написать Новая строка(ентер) когда в мемо жмешь ентер появляется новая строка как сделать такое программно
Delphi Из ppt в doc Здравствуйте. Срочно нужно пределать тесты, из ппт в док. Там фишка в том, что написано задание, а ниже 4 ответа и анимацией выделяется правильный вариант. Может как-то можно перехватить эту анимацию и скопипастить в док? Я просто ничего по работе с powerpoint'ом не смог найти толкового в нэте. Чем можете помочь? https://www.cyberforum.ru/ delphi-beginners/ thread420116.html Delphi Экспорт данных из Excel в Delphi Пожалуйста помогите. Времени уже нет нужен исходник или код "Экспорт данных из Excel в базу данных Delphi" Благодарю за помощь !!! https://www.cyberforum.ru/ delphi-beginners/ thread420088.html
Delphi Как сократить код программы
Как сократить код программы, т.е как ZuByPlayer (если кто знает), каждый элемент программы прописывается в отдельном .pas а не в одном, подскажите как такую же "штучку" осуществить? Заранее благодарен.
Delphi Определить фамилии женатых (замужних) людей, имеющих детей https://www.cyberforum.ru/ delphi-beginners/ thread419999.html
ЗАДАЧА: Известны фамилии 25-ти человек, их семейное положение: женат(замужем) или нет, и сведения о наличии детей(есть или нет). Определить фамилии женатых (замужних) людей имеющих детей. Запуталась с условиями,что не так? намудрила я , исправьте unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
0 / 0 / 0
Регистрация: 25.11.2011
Сообщений: 10
30.12.2011, 03:20  [ТС] 0

Вычисление факториала - Delphi - Ответ 2343651

30.12.2011, 03:20. Показов 17880. Ответов 9
Метки (Все метки)

Ответ

ошибку на этой функции выдаёт
function FactDS(X: int64):extended;

Добавлено через 3 минуты
по формуле Джеймса Стирлинга не получается
Delphi
1
2
3
4
5
//--- формула Джеймса-Стирлинга
function FactDS(X: int64):extended;
begin
  Result:=round(SQRT(2*Pi*X)*Power(X/Exp(1),X));
end;


Вернуться к обсуждению:
Вычисление факториала Delphi
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.12.2011, 03:20
Готовые ответы и решения:

Вычисление факториала
procedure TForm1.Button1Click(Sender: TObject); var x,k,n,p,i,q:integer; s,s1:double; begin...

Вычисление факториала
Доброго всем времени суток. Пишу простенькое приложение для вычисления кол-ва сочетаний с...

Вычисление факториала
как с помощью for написать программу для подсчета n!

Вычисление факториала
как для кнопки сделать так, чтоб она считала факториал числа ( в калькуляторе). мы нажимаем цифру,...

9
30.12.2011, 03:20
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.12.2011, 03:20
Помогаю со студенческими работами здесь

Вычисление факториала
Ошибка дает на f := factorial(k); procedure TForm1.Button1Click(Sender: TObject); var...

Калькулятор, вычисление факториала
Необходим код простейшего калькулятора... (+ - * /) Из нестандартных операций нужен лишь n! (n...

Вычисление факториала - составить код по блок-схеме
Доброго времени суток, я как новенький в работе Delphi не могу сделать програмку в консольном...

Двоичный логарифм факториала
Всем привет. Нужно создать калькулятор, все арифметические действия я сделал, но никак не могу...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru