известны год, номер месяца и день рождения человека, а также год, номер месяца и день сегодняшнего дня. определите возраст человека (число полных лет). гарантируется, что человек родился раньше сегодняшнего дня. требуется вывести одно целое число — возраст человека. примеры: входные выходные данные 2 1 1920 18 9 2013 31 12 2001 1 1 2033
// Cборка 1590 от 03.12.2017
begin
var (dr,mr,gr):=ReadInteger3('Введите день, номер месяца и год рождения->');
var (ds,ms,gs):=ReadInteger3('Введите какой день, номер месяца и год на данный момент->');
var kol:=gs-gr;
if ((ms<mr) and (ds<dr)) or ((ms=mr) and (ds<dr)) then dec(kol);
Println('Количество лет->',kol);
end.
Пример(1):
Введите день, номер месяца и год рождения-> 2 1 1920
Введите какой день, номер месяца и год на данный момент-> 18 9 2013
Количество лет-> 93
Пример(2):
Введите день, номер месяца и год рождения-> 31 12 2001
Введите какой день, номер месяца и год на данный момент-> 1 1 2033
Количество лет-> 31