составить программу в паскале! 9 класс! СРОЧНО!!! пожалуйста!!! без всяких div и mod. Год является високосным, если его номер кратен 4. Из кратных 100 високосными являются лишь те года, которые кратны также 400 (например, 1700, 1800 и 1900 — не високосные года, 2000 — високосный). Дано натуральное число n. Определить, является ли високосным год с таким номером.

Есть ответ
12.12.2022
437

Ответ


programm p;

var n:integer;

begin

readln(n);

if n/4=int(n/4) then

begin

if (n/100=int(n/100))and(n/400int(n/400)) then

writeln('Не високосный') else

writeln('Високосный';

end

else writeln('Не високосный')

 

end;


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
12.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.