Type mes = (jan, feb, mar, apr, may, jun, jul, aug, sep, oct, nov, dec); day = 1..31; var...

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.

Answer 1

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

---

Скачать вложение Текст (TXT)

Comments

спасибо, я уже сделала