|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
24.10.2012, 18:09 | #1 |
Пользователь
Регистрация: 16.05.2011
Сообщений: 45
|
Подскажите пожалуйста. Как осуществляется вот такая задача:
Ввожу число в Edit от 0 до 99, после нажатия кнопки в мемо выводится сообщение "Я прочитал n книг". Как сделать, чтобы менялось окончание у слова "книг(у;и)". Код:
Заранее благодарен. Так, какое-то просветление, но не получается. Код:
Последний раз редактировалось Stilet; 24.10.2012 в 20:52. |
24.10.2012, 18:27 | #2 |
Форумчанин
Регистрация: 18.01.2012
Сообщений: 975
|
Код:
Благодарить в репутацию. Проклинать — туда же
|
24.10.2012, 18:27 | #3 |
Пользователь
Регистрация: 16.05.2011
Сообщений: 45
|
Ну я всё) Стоило только прочитать про mod.
Код:
|
24.10.2012, 18:29 | #4 |
Пользователь
Регистрация: 16.05.2011
Сообщений: 45
|
Вместе написали сообщение. Допёрло до меня. Тебе спасибо, что отреагировал. А мне спасибо, что сам разобрался )))
|
24.10.2012, 18:48 | #5 |
Старожил
Регистрация: 16.05.2012
Сообщений: 3,211
|
Интересно, что вы будете делать с числами второго десятка?
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
|
25.10.2012, 09:22 | #6 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
рискну предложить и свой вариант, лишённый ограничений, на которые Вам намекают форумчане...
Код:
|
25.10.2012, 12:38 | #7 |
Старожил
Регистрация: 16.05.2012
Сообщений: 3,211
|
Сергей, можно было n задать от 11 до 19 - 10 и 20 попадают под другое условие. Но это не суть важно.
Кстати, совсем недавно (на той неделе) подобная задача была, только там вместо книг грибы считали... до чего ж ленивые студенты пошли...
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
|
25.10.2012, 12:55 | #8 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Sciv, а вы думаете, я свой код писал? я же страшно ленивый! я взял старый пример с форума, чуток переделал (вместо WriteLn - Memo1.Text, вместо лет/год/года поставил "книг/книги/книгу" и вуаля, программа написана!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос замены цифры на символ | Talier | Microsoft Office Excel | 2 | 24.09.2012 12:50 |
запрет на минус не вначале цифры в edit | 13xXx13 | Помощь студентам | 2 | 21.09.2012 22:37 |
Цифры в Edit(delphi) | CAMOBAP | Помощь студентам | 4 | 25.01.2011 22:17 |
Первый символ в Edit-e | artemavd | Общие вопросы Delphi | 2 | 24.09.2009 21:35 |
Вывод ошибки при вводе цифры 1..5 в поле Edit | prikolist | Общие вопросы C/C++ | 2 | 16.03.2009 00:22 |