윤년을 계산하는 것은 주로 2월의 일수를 결정하는 것입니다. 일반적으로 2월은 윤년이 29일이고 평년이 28일입니다. 윤년을 계산하는 알고리즘은 매우 간단합니다. 즉, 400으로 나누어지거나 4로 나누어지지만 100으로 나누어지지 않습니다.
알고리즘은 다음과 같습니다:
함수 isLeapYear(pYear)
oreg=new RegExp 설정
oreg.Pattern="^d{4}$"
oreg.Test(pYear)가 아니면
isLeapYear=거짓
종료 기능
종료하면
o연도=clng(p연도)
if ((oYear mod 4=0 및 oYear mod 100<>0) 또는 oYear mod 400=0) then
isLeapYear=true
또 다른
isLeapYear=거짓
종료하면
함수 종료