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

Question

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

Answer 1

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