Type mes = (jan, feb, mar, apr, may, jun, jul, aug, sep, oct, nov, dec); day = 1..31; var k: 1..366; d: 1..31; определить k – порядковый номер того

Question

Информатика: Type mes = (jan, feb, mar, apr, may, jun, jul, aug, sep, oct, nov, dec); day = 1..31; var k: 1..366; d: 1..31; определить k – порядковый номер того дня високосного года, который имеет дату d, mes.

nova9696 · Answer

Если задача здесь должна решаться  с использованием порядковых типов, то это можно сделать так, как показано в прилагаемом файле....

Type mes = (jan, feb, mar, apr, may, jun, jul, aug, sep, oct, nov, dec); day = 1..31; var k: 1..366; d: 1..31; определить k – порядковый номер того дня високосного года, который имеет дату d, mes.

Популярные вопросы