Дан номер года. Определить количество дней в этом году, если високосный год делится на 4, за исключением тех годов, которые делятся на 100 и не делятся на

400. Решить нужно с помощью case.

Question

Информатика

Афанасий

17 апреля, 08:23

Дан номер года. Определить количество дней в этом году, если високосный год делится на 4, за исключением тех годов, которые делятся на 100 и не делятся на

400. Решить нужно с помощью case.

+2

Ответы (1)

Знаете ответ на вопрос?

Эля · Answer 1

Program gt;

var n:longint;

begin

readln (n) ;

case n of

1 ... 10000: if (n mod 400=0) or ((n mod 4=0) and (n mod 1000)) then writeln ('YEs') else

writeln ('NO') ;

end;

end.