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

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

Программка Паскаль

Помогите пожалуйста. Заблаговременно СПАСИБО

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

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программка не работает, обновите версию!

begin

 var m := Arr('Зима', 'Зима', 'Весна', 'Весна', 'Весна', 'Лето',

     'Лето', 'Лето', 'Осень', 'Осень', 'Осень', 'Зима');

 var k := ReadInteger('Введите номер месяца:') - 1;

 if k.InRange(0, 11) then Println(m[k])

 else Println('Недопустимый номер месяца')

end.


Введите номер месяца: 11

Осень

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


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

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

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

Войти на сайт