Вводится возраст человека. Вывести на экран, является ли он ребенком, молдых лет или пожилым

uses crt; var x:integer; begin write('Лет:'); read(x); if (x>=5) and (x<=18) then write('Ребенок.'); if (x>18) and (x<=45) then write('Молодой человек.'); if (x>55) and (x<=100) then write('Пожилой.'); end. Например,а про человека(какой он),не всегда можно по годам определить!