Question

Задача. Год является високосным, если его номер кратен 4,однако из кратных 100 високосными являются лишь кратные 400. Например 1700,1800,1900-не високосные, а 2000 високосный. Дано натуральное число n. Определить, является ли високосным год с таким номером? Решить на паскале, уровень 8 класса!

Answer 1

programm LeapYear;
var y: integer;
begin
  readln(y);
  if y/4=int(y/4) then
  begin
    if (y/100=int(y/100))and(y/400<>int(y/400)) then
      writeln('Не високосный') else
      writeln('\Високосный';)
  end
  else writeln('Не високосный')
end;

Answer 2

Если н не делится на 4 то не високосный, если делится, то проверяем дальше, если н не делится на 100 то високосный, если же делится. проверяем дальше, если н не делится на 400 то не високосный, если н делится на 4000 то високосный