Задача. Год является високосным, если его номер кратен 4,однако из кратных 100 високосными являются лишь кратные 400. Например 1700,1800,1900-не високосные, а 2000 високосный. Дано натуральное число n. Определить, является ли в...
Задача. Год является високосным, если его номер кратен 4,однако из кратных 100 високосными являются лишь кратные 400. Например 1700,1800,1900-не високосные, а 2000 високосный. Дано натуральное число n. Определить, является ли високосным год с таким номером? Решить на паскале, уровень 8 класса!
Гость
Ответ(ы) на вопрос:
ГостьЕсли н не делится на 4 то не високосный, если делится, то проверяем дальше, если н не делится на 100 то високосный, если же делится. проверяем дальше, если н не делится на 400 то не високосный, если н делится на 4000 то високосный
Гость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;
Не нашли ответ?
Похожие вопросы