83

Записать последовательность операторов для решения задачи: Дано описание: type…

05 февраля 2023

Записать последовательность операторов для решения задачи: Дано описание: type month=1… 12; var d: 28… 31; m: month; Переменной d присвоить количество дней в месяце m (год считать не високосным)

категория: информатика



55

Даже не знаю. Так? type month=1… 12; var d: 28… 31; m: month; beginread (m); case m of1,3,5,7,8,10,12: d: =31; 4,6,9,11: d: =30; 2: d: =28; end; write (d) end.

Знаете ответ?


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