Программка запрашивает номер месяца и выдает время года, которому этот месяц

Программа запрашивает номер месяца и выдает время года, которому этот месяц принадлежит (к примеру, 4- весна, 7 - лето)

Задать свой вопрос
1 ответ

program raf105;

var m: integer;

begin

write('Введите номер месяца: ');

readln(m);

case m of

 12,1,2: writeln('Это зима');

 3..5: writeln('Это весна');

 6..8: writeln('Это лето');

 9..11: writeln('Это осень');

end;

end.

PascalABC 3.4.2

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт