Составить программу, которая по введенному номеру месяца выдает, сколько дней в этом месяце. Год считать не високосным




Составить программу, которая по введенному номеру месяца выдает, сколько дней в этом месяце. Год считать не високосным
спросил 18 Дек, 18 от cevka в категории школьный раздел


решение вопроса

+7
Var
    a: Integer;
 
Begin
    WriteLn ('Введите номер месяца');
    ReadLn (a);
    Case a Of
        1, 3, 5, 7, 8, 10, 12: WriteLn ('31 день');
        2: WriteLn ('28 дней');
        4, 6, 9, 11: WriteLn ('30 дней');
        End;
    ReadLn
End.
ответил 18 Дек, 18 от Olenka

Связанных вопросов не найдено

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

Популярное на сайте:

Как быстро выучить стихотворение наизусть? Запоминание стихов является стандартным заданием во многих школах. 

Как научится читать по диагонали? Скорость чтения зависит от скорости восприятия каждого отдельного слова в тексте. 

Как быстро и эффективно исправить почерк?  Люди часто предполагают, что каллиграфия и почерк являются синонимами, но это не так.

Как научится говорить грамотно и правильно? Общение на хорошем, уверенном и естественном русском языке является достижимой целью.