program age(input, output); var age: integer; begin writeln('Enter your age.'); readln(age); if age < 18 then writeln('You are not an adult.'); else begin write('You are an adult, '); if (age >= 18) and (age < 55) then begin write('and you are working.'); writeln(' '); end else if age >= 55 then begin write('and you are retired.'); writeln(' '); end end end.