Впаскале, в if. требуется определить, является ли - вопрос №8579508 от dashasapleva6 19.02.2021 05:45

Question

Информатика: Впаскале, в if. требуется определить, является ли данный год високосным. (напомним, что год является високосным, если его номер кратен 4, но не кратен 100, а также если он кратен выведите сообщение на экран «год високосный» или «год не високосный».

dashasapleva6 · Answer

Var  a: integer;begin  read(a);  if (a mod 4 = 0) and (a mod 100 0) or (a mod 400 = 0) then     writeln( Да ) else    writeln( Нет );end....