Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Алгоритм вычисления номера квартала [D6, Win2k]

Denis_Visma © (2004-06-18 11:29:00)
Люды!!! есть у кого то сабж.

VMcL (2004-06-18 18:43:00) [1]
>>panov © (18.06.04 18:28) [13]

Думающая часть, обычно, не на железе, а на кремнии или чём-нить вроде того :)

panov (2004-06-18 18:28:00) [2]
>VMcL © (18.06.04 17:54) [12]

ПУсть железяка работает, она железная!-)

VMcL (2004-06-18 17:54:00) [3]
>>panov © (18.06.04 16:28) [8]

ИМХО, лучше несколько доп. байт в стеке выделить, чем заставлять динамическую строку мурыжить. Я уж молчу про быстродействие :)

Jeer (2004-06-18 17:40:00) [4]
Алхимик © (18.06.04 17:22) [10]

Вот и я так подумал, хотел уже спутниковую съемку и распознавание образов рекомендовать:)

Алхимик (2004-06-18 17:22:00) [5]
Алгоритм вычисления номера квартала...
... по номеру дома.
:)

Johnmen (2004-06-18 17:12:00) [6]
>>panov © (18.06.04 16:15) [6]

Гы, а чё не через MonthOf, а через FormatDateTime + StrToInt?

>Так зачем лишние переменные вводить?

Типа MM совсем не лишняя ?
:)

panov (2004-06-18 16:28:00) [7]
>VMcL © (18.06.04 16:21) [7]

Так зачем лишние переменные вводить?

VMcL (2004-06-18 16:21:00) [8]
>>panov © (18.06.04 16:15) [6]

Гы, а чё не через DecodeDate, а через FormatDateTime + StrToInt?

panov (2004-06-18 16:15:00) [9]
Да какой тут алгоритм? Какие статьи?

Весь алгоритм заключается в получении номера месяца.

function Kvart(const aDate: TDateTime): Integer;
var
MM: Integer;
begin
MM := StrToInt(FormatDateTime('mm',aDate));
Result := (MM div 4) + 1;
end;

TUser (2004-06-18 16:00:00) [10]

> http://delphiworld.narod.ru

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

Gala (2004-06-18 15:59:00) [11]
ceil(MonthOf(Date())/3)

ПсихЪ (2004-06-18 14:00:00) [12]
Блин!!! ): Ну, чёрт вас подери!!! Ну ведь это же настолько... ): Блин, короче... ):
http://delphiworld.narod.ru- качай и не задавай глупых вопросов!!!

TUser (2004-06-18 12:45:00) [13]
У меня есть. Работает за О(С) при любых исходных данных. Могу обменять на алгоритм сортировки произвольного массива, работающий с такой же скоростью.

panov (2004-06-18 11:33:00) [14]
А что, для этого специально алгоритм нужен?
Знаний арифметики в пределах 4-х классов школы не достаточно?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »