type

 Months = (Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec);

 Seasons = (Winter, Spring, Summer, Autumn);

begin

 var monthNumber := ReadInteger();

 var M := Arr(Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec);

 var Month := M[monthNumber - 1];

 var Season: Seasons;

 case Month of

   Dec, Jan, Feb: Season := Winter;

   Mar, Apr, May: Season := Spring;

   Jun, Jul, Aug: Season := Summer;

   Sep, Oct, Nov: Season := Autumn;

 else

 end;

 Print(Month, Season)

end.

C++

#include "pch.h"

#include <iostream>

using namespace std;

int main()

{

int a;

setlocale(LC_ALL, "Russian");

cout << "введите номер месяца"<<"n";

cin >> a;

if (a==1)  

{

 cout << "Январь, зима";

}

else if (a == 2)

{

 cout << "Февраль, зима";

}

else if (a == 3)

{

 cout << "Март, весна";

}

else if (a == 4)

{

 cout << "Апрель, весна";

}

else if (a == 5)

{

 cout << "Май, весна";

}

else if (a == 6)

{

 cout << "Июнь, лето";

}

else if (a == 7)

{

 cout << "Июль, лето";

}

else if (a == 8)

{

 cout << "Август, лето";

}

else if (a == 9)

{

 cout << "Сентябрь, осень";

}

else if (a == 10)

{

 cout << "Октябрь, осень";

}

else if (a == 11)

{

 cout << "Ноябрь, осень";

}

else if (a == 12)

{

 cout << "Декабрь, зима";

}

else

{

 cout << "неверно введен номер месяца";

}

return 0;

}