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

Question

83

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

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

ответить

в избранное ссылка

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

kristan · Accepted Answer

55

kristan

03 февраля 2024

Даже не знаю. Так? 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.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: