Дата прописью

Автор:Zhukov
Дата:27.03.2008
Просмотров:5950
Скачиваний:1167
Оценка:, Оценок - 3

Описание

Текст примера

 var strtDate : date    = date(12,10,1981)
  , i        : integer = 0
  , _Ndays   : integer = 365
  ;

while( i < _Ndays )
   /*
    Полная дата
    ┌─┬────────────────┬──────────────────┬───────────────────────┐
    │#│Русское название│Латинское название│Характеризующий вопрос │
    ├─┼────────────────┼──────────────────┼───────────────────────┤
    │0│ Именительный   │   Номинатив        │    Кто? Что?            
    │1│ Родительный    │   Генитив          │    Кого? Чего?          
    │2│ Дательный      │   Датив            │    Кому? Чему?          
    │3│ Винительный    │   Аккузатив        │     Кого? Что?           
    │4│ Творительный   │   Аблaтив          │    Кем? Чем?            
    │5│ Предложный     │   Локатив          │    О ком? О чём?        
   */
   println( strtDate," = ", get_fullDateName(strtDate,1) );
   i = i + 1;
   strtDate = strtDate + 1;
end;