Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

Ввести номер месяца и вывести количество дней в нем, а также число ошибок при вводе.С использованием case. Массивы не проходили.

более месяца назад
Просмотров : 31    Ответов : 1   

Лучший ответ:

Не совсем понятно, что значит число ошибок при вводе?
Могу предложить такой вариант решения:
program Dni;
var
m:integer;
Begin
writeln('Введите номер месяца');
readln(m);
case m of 
1,3,5,7,8,10,12:writeln('31 день');
2:writeln('В високосном году в феврале 29 дне, в обычном году - 28 дней');
4,6,9,11:writeln('30 дней');
else writeln('В году 12 месяцев. Вы ввели ошибочный номер');
END.

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт





Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы: