Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.10.2012, 22:45   #1
3Doleg
Пользователь
 
Регистрация: 03.10.2012
Сообщений: 67
Вопрос Оператор if, немного запутался, плис)

Известна дата рождения человека (год, номер месяца, число) и сегодняшняя дата. Определите возраст человека (число полных лет).
3Doleg вне форума Ответить с цитированием
Старый 05.10.2012, 23:04   #2
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

OFFTOP >
...зашел в тему, клюнул на ПЛИС
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 05.10.2012, 23:25   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

фактически задача сводится к тому, чтобы сравнить две даты:
ДДРожд.ММРожд и ДДСег.ММСег
Код:
if ДДРожд.ММРожд <= ДДСегодня.ММСегодня
    тогда число_полных_лет := ГодСегодня - ГодРожд-1
    else  число_полных_лет := ГодСегодня - ГодРожд;
ну, а чтобы сравнить даты - сначала сравнивайте месяцы - какой месяц больше, та и дата больше, если месяцы равны, тогда сравниваем даты, какая дата больше, та и дата больше.



Цитата:
Сообщение от raxp
...зашел в тему, клюнул на ПЛИС
подозреваю, что автор темы и не подозревает, ЧЕМ именно он Вас в тему заманил (ну не знает он ваших ПЛИСов... )
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
прошивка ПЛИС Павел777 Помощь студентам 10 10.05.2012 00:23