Надо просклонять часы с точностью до получаса

один час, полтора часа, два часа, два с половиной часа...,пять часов, пять с половиной часов....

ЗЫ минуты не устраивают.
ЗЫ Если лень можете не говорить

не говорю т.к. лень

(0) Надо - просклоняй, в чем проблема-то?

(1) сомневаюсь

(2) проблема в половинах

"23 с половиной часов" звучит как-то коряво...

а как правильно
двадцать один с половиной часа
или
двадцать один с половиной час
или
двадцать один с половиной часов

(4) Никаких проблем. Все, кроме 1,5 - "с половиной".

(5) угу режит слух...

пиши "час." :)

(7) еще 0,5

(7) ну я чтото не понимаю
ЧислоПрописью(КолЧасов,"L=ru_RU","час,часа,часов,м ,,,,,0") + "с половиной";
- это у меня бред, но как правильно я чтото никак

Очень в лом 48 строк написать ? =)

сделай регистр с сорока восемь строками, цифры и текстовое представление

23 часа 00 минут
23 часа 30 минут

и все

(14) умник блин, говорю без минут

(15) Если "без минут", то и полчаса быть не может.

нарисуй табличку и делай выборку из нее. с добавление слова примерно, если не точное время =)))

полночь
полпервого ночи
час ночи ровно
и т.д.

(16) эээ.
Вообщет так:
1) меньше часа быть не может.
2) словосочетание в котором будет использоваться
"Количество часов сервиса по договору состовляет [2.5][(два с половиной)] часА

(18) тут попадаешь на (6)

полчаса - это не минуты чтоли?

пили тогда

23 часа
23 с половиной часа

Двадцать три с половиной часа, поскольку Двадцать три часа с половиной
Двадцать один с половиной час, поскольку Двадцать один час с половиной

А так?
Двадцать один час 30 минут

(22) Количество часов сервиса по договору состовляет Двадцать один час 30 минут (учитывая 18)
както не очень звучит

(18) как-то так

Стр = ЧислоПрописью(Цел(КолЧасов),"L=ru_RU","час,часа,часов,м ,,,,,0") + "с половиной";

Если КолЧасов <> Цел(КолЧасов) Тогда
 Стр = СтрЗаменить(Стр, "час", "с половиной час");
КонецЕсли;

Если КолЧасов = 1.5 Тогда
  Стр = "Полтора часа";
КонецЕсли;

(23) в минутах все пиши. 1410 минут

(24) +

Стр = ЧислоПрописью(Цел(КолЧасов),"L=ru_RU","час,часа,часов,м ,,,,,0");

Если КолЧасов <> Цел(КолЧасов) Тогда
 Стр = СтрЗаменить(Стр, "час", "с половиной час");
КонецЕсли;

Если КолЧасов = 1.5 Тогда
  Стр = "Полтора часа";
КонецЕсли;

Ладно, пойду, всем спасибо