 |
Экспертная система Delphi.int.ruСообщество программистов |
Регистрация на сайте занимает 40 секунд, а пользу приносит годами. |
Delphi.int.ru Expert
Другие разделы портала
Статистика за сегодня:
Лучшие эксперты
Добро пожаловать в экспертную систему портала Delphi.int.ru!Первый раз на портале? Начните с регистрации. Если Вы уже зарегистрированы, введите логин и пароль вверху страницы для авторизации. Для оперативного получения обновлений воспользуйтесь RSS-лентами.
|
| ||||||||||||||||||||||||||||||||
 |
Здравствуйте, eclipse!
В принципе, можно выполнить строчку:
showmessage('DateTimePicker1.date=' + floattostr(DateTimePicker1.date) +
', CurDate=' + floattostr(CurDate) +
', DateTimePicker2.date=' + floattostr(Date…
Раздел: Delphi » Алгоритмы, преобразования |
 |
Ну, вот, написал на коленке, не отлаживая. Кажется, вроде, должно работать:
case Разница mod 100 of
11..19: Label1.Caption:= 'дней';
else case Разница mod 10 of
1: Label1.Caption:= 'день';
2..4: Label1.Caption:= 'дня';…
Раздел: Delphi » Алгоритмы, преобразования |
 |
Здравствуйте, victor_as!
Наверное Вы имели в виду не ShowMessage, а SendMessage?
Раздел: Delphi » Общие вопросы по программированию |
|
Ну написал, допустим. Пиво будет?
Раздел: Лабораторный практикум » Delphi |
|
Здравствуйте, callYpsO!
Боюсь Вас огорчить, но в Вашем вопросе совершенно отсутствует постановка задачи для программиста.
Для начала забудьте о строка и о том, что вы не знаете как с ними работать.
Постарайтесь написать что будет делать пользова…
Раздел: Лабораторный практикум » Pascal |
 |
Здравствуйте, kinetik!
Нельзя говорить "факториал только четных" чисел. Потому что он будет бесконечно большой. То, о чем Вы пишете - это двойной факториал. Рассчет на самом то деле очень простой.
рекурсивно
function f2(n:integer):integer;
begi…
Раздел: Лабораторный практикум » Delphi |
|
Здравствуйте, kinetik!
Точно также, как и факториал вообще. Факториал - произведение всех натуральных чисел от 1 до заданного числа.
Но может быть Вам интересно о двойном факториале (!!) - здесь уже есть небольшая особенность. Для четных это будет…
Раздел: Разные вопросы |
Последние сообщения на мини-форумах
Вопрос № 5 914 (участник: min@y™; отправлено: сегодня, 14:02)
Я могу всё это сделать. Ответь только на один вопрос: ты перечитывал свой текст, прежде чем тыкнуть батон "отправить"?
Вопрос № 5 913 (участник: AlexMPEI; отправлено: сегодня, 06:23)
для этой функции в usus подкючается файл NB30 - работа с нетбиос
Вопрос № 5 880 (участник: victor_as; отправлено: вчера, 19:32)
{{user:3973|SOA}}: спасибо за помощь уже разобрался! Подскажите кто знает как работать с Ballonom (подскаска) или может у кого то есть компонент
Вопрос № 5 913 (участник: SOA; отправлено: вчера, 19:29)
to {{user:3409|AlexMPEI}}: Скорее всего какая то из используемых функций привязана к dll устанавливаемым вместе с Delphi, попробуйте проверить к каким...
Вопрос № 5 802 (участник: SOA; отправлено: вчера, 19:23)
to {{user:4223|bugmenot}}:
А еще у всех под windows есть DirectX, где есть DirectSound, если не ошибаюсь, но если хочется работать напрямую с железо...
Вопрос № 5 913 (участник: AlexMPEI; отправлено: вчера, 19:22)
автора не найти. да и примудрого особо в этой функции ничего нет. Просто если поискать по инету "получить МАС" то на всех сайтах приводится эта ф-я в ...
Вопрос № 5 802 (участник: bugmenot; отправлено: вчера, 19:05)
придется писать драйвер режима ядра
гонево, этот драйвер у всех уже есть, это \Device\Beep
Вопрос № 5 912 (участник: bugmenot; отправлено: вчера, 19:02)
вот поэтому надо со ступидентов всегда требовать предоплату
Вопрос № 5 908 (участник: bugmenot; отправлено: вчера, 19:01)
промахнулся
Вопрос № 5 913 (участник: bugmenot; отправлено: вчера, 18:57)
а что сказал аффтар?
Участники, находящиеся в данный момент на сайте:
winner13, а также гости (19) (максимум: 115).
Время сайта: 28 января 2012, 18:19 Ваше время: 28 января 2012, 14:19 |
Выполнено за 0.36 сек.