Даю 50 баллов. 4 задание.

Question

Даю 50 баллов. 4 задание.

---

Comments

Язык С++?

---

PASCALabc

Answer 1

//PascalABC.NET

begin
    writeln('Введите порядковый номер месяца');
    var a := ReadInteger();
    case a of
        12,1,2 : writeln('Зима');
        3..5 : writeln('Весна');
        6..8 : writeln('Лето');
        9..11 : writeln('Осень');
        else writeln('Вы живете в параллельной вселенной');
    end
end.

---

---

---