На форуме: 351 дней

Список разделов Форум Тех. поддержка

Описание: Здесь вы можете задать вопросы по технической части.

#1 one » Чт, 26 февраля 2009, 20:04

Неправильная форма слова "день" после числительного. Предлагаю использовать примерно такую функцию
i - число дней.
Функция возвращает правильную форму слова "день"

Function Dney(i)
s=String(i); //Перевод числа в строку
LastSymbol=Right(s,1); // Крайний символ справа
LastSymbol2=""; // Второй символ справа

If StrLen(s)>1 Then
// Многозначное число
LastSymbol2=Mid(s,StrLen(s)-1,1); // Второй символ справа
EndIf;

If LastSymbol2="1" Then
// 10, 11, 12, 13, 14, 15, 16, 17, 18, 19
Return "дней";
EndIf;

If LastSymbol="0" Then
// 20, 30, 40, 50, 60, 70, 80, 90
Return "дней";
EndIf;

If LastSymbol="1" Then
// 21, 31, 41, 51, 61, 71, 81, 91
Return "день";
EndIf;

If LastSymbol>="5" Then
// 25, 26, 27, 28, 29, ...
Return "дней";
EndIf;

// 22, 23, 24, ...
Return "дня";
EndFunction
one
Автор темы
Аватара
Откуда: Омск
Сообщения: 462
Темы: 29
Зарегистрирован: Вс, 17 февраля 2008
С нами: 17 лет 5 месяцев

Re: На форуме: 351 дней

#2 Ананас » Чт, 26 февраля 2009, 21:41

это че за язык, паскаль чтоли?
Ананас

Re: На форуме: 351 дней

#3 one » Пт, 27 февраля 2009, 5:22

Ананас писал(а):это че за язык, паскаль чтоли?
one
Автор темы
Аватара
Откуда: Омск
Сообщения: 462
Темы: 29
Зарегистрирован: Вс, 17 февраля 2008
С нами: 17 лет 5 месяцев

Re: На форуме: 351 дней

#4 Ананас » Пт, 27 февраля 2009, 14:17

one
Блин. То то я гляжу что то знакомое)) Жестоко писать код на 1с (сам 1совец))
Ананас


Вернуться в Тех. поддержка

Кто сейчас на форуме (по активности за 5 минут)

Сейчас этот раздел просматривают: 1 гость