Помогите решить задачу по информатике:
Требуется определить, является ли данный год високосным. (Напомним, что год является високосным, если его номер кратен 4, но не кратен 100, а также если он кратен 400.)
Вот я тут попробовал решить в паскале:
var
a:integer;
begin
read(a);
if (((a mod 400)=0) and ((a mod 100)<>0)) or ((a mod 4)=0) then
write('YES')
else
write('NO');
end.
но если я ввожу число, кратное 100 но не кратное 400, то выводит YES, а нужно NO.
ПОМОГИТЕ РЕШИТЬ ПОЖАЛУЙСТА!!!
можно решить в pascal или в pascal ABC или в Python.

Ответы (1)

Джозеф 09.10.2024 2

Замените условие на следующее:
if ((a mod 4=0)or ((a mod 1000) and (a mod 400=0))) then ...

Знаете правильный ответ?

Думаешь ответы не верны?

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

Воспользуйтесь поиском

Новые вопросы по предмету Информатика: