написать программку которая вводит номер месяца и определяет по этому номеру

Написать программу которая вводит номер месяца и определяет по этому номеру время года, и заглавие выводит на экран и если число больше 12, то такового номера месяца не существует, язык паскаль

Задать свой вопрос
Алёна Зубатова
да
Вадим Стригонов
8 класс
Viktor Malechkovich
Куда она его вводит?
Протасьев Данил
тебе в жопу
1 ответ
Var n:byte;
Begin
write('Введите номер месяца: ');
readln(n);
Case n of
1 ,2,12:writeln('Зима');
3..5:writeln('Весна');
6..8:writeln('Лето');
9..11:writeln('Осень')
else writeln('Не корректный номер месяца');
End;
End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт