uses crt;
var adge:integer;
begin;
clrscr;
writeln('Введите возраст ребенка');
readln(adge);
IF (adge > 5) and (adge <= 7) THEN writeln('5-й отряд');
IF (adge > 7) AND (adge <= 9) THEN writeln('4-й отряд') ;
IF (adge > 9) AND (adge <= 11) THEN writeln('3-й отряд') ;
IF (adge > 11) AND (adge <= 13) THEN writeln('2-й отряд') ;
IF (adge > 13) AND (adge <= 15) THEN writeln('1-й отряд')  ;
IF (adge < 6) OR (adge > 15) THEN writeln('В лагерь не допускается');
end.