Требуется определить, является ли данный год високосным. (напомним, что год является високосным, если его номер кратен 4, но не кратен 100, а также если он кратен 400.) входные данные вводится единственное число - номер года (целое, положительное, не превышает 30000). выходные данные требуется
вывести слово yes, если год является високосным и no - в противном случае. pascal

aalenka471 aalenka471    2   08.10.2019 04:50    6

Ответы
ARDASHEV2019 ARDASHEV2019  11.08.2020 15:28

program godVisоkos;

var

 god: integer;

begin

writeln ('Введите год');

 readln(god);

 if (god mod 4 = 0) and (god mod 100 <> 0) or (god mod 400 = 0) then  

   writeln('ВИСОКОСНЫЙ') else

   writeln('НЕ ВИСОКОСНЫЙ');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика