ввести М-номер месяца. Определить входит ли этот месяц во 2 квартал

program p1;var m:integer;beginwriteln('Введите m: '); read(m);if(m>3) and (m<7) then writeln('Этот месяц входит во 2 квартал') else writeln('Этот месяц не входит во 2 квартал');end.