Помогите решить задачу по информатике:
Требуется определить, является ли данный год високосным. (Напомним, что год является високосным, если его номер кратен 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.
Замените условие на следующее:
if ((a mod 4=0)or ((a mod 100<>0) and (a mod 400=0))) then ...
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
