Чего то туплю, почему четверг?
Сообщить(НомерДняНедели(ТекущаяДата()));
Сообщить(Формат(НомерДняНедели(ТекущаяДата()),"ДНННН"));
Сообщить(Формат(ТекущаяДата(),"ДНННН"));

3
Четверг
Среда

А что Вы ожидаете от строка кода:
Формат(3, "ДНННН")

+1
WWWW (НННН), выводит наименование дня недели, соответсвующее указанной дате. Наименования дней недели берутся из файла прописи.

Подозреваю что вычисляется номер дня в году. По крайней мере совпадает: 03.01.2013 - четверг.

НомерДняНедели - лишнее

(2) логично, спасибо.

(0)
всё просто

Дата(3) = '12.31.-71'
НомерДняНедели(дата(3)) = НомерДняНедели('12.31.-71') = 4

ну и  формат тебе приводит 4 к четвергу..

точнее, не четыре, а дату '12.31.-71' преобразует в четверг

+2 Во че нашел. От рождения христа 03.01.0001 - тоже четверг.