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

Uses crt; var x: integer; beginwrite ('Лет: '); 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. Например, а про человека (какой он) , не всегда можно по годам определить!