Program n1; var a: integer; begin write('введите номер месяца: '); readln(a); if( a>=1) and (a<3) then writeln('зима'); if(a>=3) and (a<6) then writeln('весна'); if (a>=6) and (a<9) then writeln('лето'); if(a>=9) and (a<13) then writeln('осень'); end.
Answers & Comments
Verified answer
Program n1;var a: integer;
begin
write('введите номер месяца: ');
readln(a);
if( a>=1) and (a<3) then writeln('зима');
if(a>=3) and (a<6) then writeln('весна');
if (a>=6) and (a<9) then writeln('лето');
if(a>=9) and (a<13) then writeln('осень');
end.