Задать вопрос
7 июля, 18:08

Пользователь последовательно вводит два числа. Первое-день месяца, второе-число месяца. Написать программу, чтобы она вывела что-то вроде (1 января)

+4
Ответы (1)
  1. 7 июля, 19:07
    0
    Var a: byte; b:integer;

    Begin

    writeln ('Введите день месяца') ;

    readln (b) ;

    writeln ('Введите номер месяца') ;

    Readln (a) ;

    Case a of

    1: writeln (b,' янавря') ;

    2: writeln (b,' февраля') ;

    3: writeln (b,' марта ') ;

    4: writeln (b,' апреля ') ;

    5: writeln (b,' мая') ;

    6: writeln (b,' июня ') ;

    7: writeln (b,' июля') ;

    8: writeln (b,' августа') ;

    9: writeln (b,' сентября') ;

    10: writeln (b,' октября') ;

    11: writeln (b,' ноября') ;

    12: writeln (b,' декабря') ;

    else writeln ('Месяца №', a,'нет') ;

    end;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Пользователь последовательно вводит два числа. Первое-день месяца, второе-число месяца. Написать программу, чтобы она вывела что-то вроде ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы