Năm nhuận là năm chia hết cho 400,hoặc không tròn trăm nhưng chia hết cho 4
Hãy cho biết có bao nhiêu năm nhuận trong khoảng thời gian 1 =>2000
Giúp mk với ạ
Đề có vấn đề một chút nhỉ? Năm nhuận là năm chia hết cho 4, hoặc chia hết cho 400 nhưng không tròn trăm nhé!
---
Program BTT; Uses crt; Var i,d: longint; Begin Clrscr; d:=0; For i:=1 to 2000 do If (i mod 4 = 0) or (i mod 100<>0) and (i mod 400 = 0) then inc(d); Write('Co ',d,' nam'); Readln End.