marinakomarova
11.08.2021 04:12

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Алёна345135537
16.04.2019 23:00
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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота