![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
![]() ![]() |
![]() |
Egor Vladimirovich |
![]()
Сообщение
#21
|
Новичок ![]() Группа: Пользователи Сообщений: 35 Пол: Мужской Реальное имя: Егор Репутация: ![]() ![]() ![]() |
В Дельфи,в консоле не смог откомпилировать.Ругаеться на Inc(DayInMonth[2], Byte((CurrYear mod 4) = 0));!! Как это можно записать по другому??? |
klem4 |
![]()
Сообщение
#22
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
И на какую же ошибку система тебе указывает ? У меня откомпилировалось нормально.
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
мисс_граффити |
![]()
Сообщение
#23
|
![]() просто человек ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: ![]() ![]() ![]() |
DayInMonth[2]:=DayInMonth[2]+Byte((CurrYear mod 4) = 0) если тоже не откомпилируется - напиши условный оператор. -------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
Egor Vladimirovich |
![]()
Сообщение
#24
|
Новичок ![]() Группа: Пользователи Сообщений: 35 Пол: Мужской Реальное имя: Егор Репутация: ![]() ![]() ![]() |
DayInMonth[2]:=DayInMonth[2]+Byte((CurrYear mod 4) = 0) если тоже не откомпилируется - напиши условный оператор. Вот такая ошибка появляеться [Error] Project2.dpr(33): Left side cannot be assigned to Я не понимаюююю! Помогите плз,завтра здавать,одной процедурки не хватает! ((( Сообщение отредактировано: Egor Vladimirovich - |
мисс_граффити |
![]()
Сообщение
#25
|
![]() просто человек ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: ![]() ![]() ![]() |
if ((CurrYear mod 4) = 0) then то есть если год високосный, делаем в феврале 29 дней. кстати, по-моему, если год делится на 100, но не делится на 400 (ну например 1900, 1700) - он не високосный. -------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
Egor Vladimirovich |
![]()
Сообщение
#26
|
Новичок ![]() Группа: Пользователи Сообщений: 35 Пол: Мужской Реальное имя: Егор Репутация: ![]() ![]() ![]() |
2 мисс графити
откомпилировал,тока че то не разобрался как наоборот сделать( Я помоему дыбил) |
Алена |
![]()
Сообщение
#27
|
Гость ![]() |
Цитата по-моему, если год делится на 100, но не делится на 400 (ну например 1900, 1700) - он не високосный. ![]() If ((CurrYear mod 4) = 0) and |
Egor Vladimirovich |
![]()
Сообщение
#28
|
Новичок ![]() Группа: Пользователи Сообщений: 35 Пол: Мужской Реальное имя: Егор Репутация: ![]() ![]() ![]() |
Помогите кто нибудь мне написать процедуру Вычисления количества дней,между 2 датами!!!!!!!!!
![]() ![]() |
Malice |
![]()
Сообщение
#29
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: ![]() ![]() ![]() |
Помогите кто нибудь мне написать процедуру Вычисления количества дней,между 2 датами!!!!!!!!! ![]() ![]() Тебе нужна функция, переводящая дату в количество дней начиная с хз какой даты: function days (y,m,d:integer):longint; Для вычисления разницы между датами в самый раз. |
Гость |
![]()
Сообщение
#30
|
Гость ![]() |
Тебе нужна функция, переводящая дату в количество дней начиная с хз какой даты: function days (y,m,d:integer):longint; Для вычисления разницы между датами в самый раз. Просто ОГРОМНОЕ СПАСИБО за помощь! |
![]() ![]() |
![]() |
Текстовая версия | 10.12.2023 20:06 |