Конструктор алгоритмов.Вводится число - номер года. Определить является ли этот год високосным. Високосным считается год, кратный 4, но не оканчивающийся двумя нулями (1900 - не високосный, но 2000 - високосный
Ответы
Ответ дал:
0
Ответ:
program abc;
var a:integer;
begin
writeLn('Введите год');
write('=> ');
readLn(a);
if (a mod 4 = 0) and ((a mod 1000 = 0) or (a mod 100 <> 0)) then writeLn('Год ',a,' - високосный') else writeLn('Год ',a,' - не високосный')
end.
Объяснение:
Похожие вопросы
1 год назад
1 год назад
1 год назад
1 год назад
2 года назад
8 лет назад