如何判断润年(1分)

  • 主题发起人 主题发起人 yangpeng0622
  • 开始时间 开始时间
Y

yangpeng0622

Unregistered / Unconfirmed
GUEST, unregistred user!
如何判断润年
 
function IsLeapYear(Year: Word): Boolean;
 
function IsLeapYear(Year: Word): Boolean;
 
要uses SysUtils 先
 
if IsLeapYear(1997) then
是闰年
else
不是闰年;
 
佩服佩服!
我刚学pascal的时候,书上就有例子。
 
谢谢大家,没想到还可以用函数,这样简单多了,不过我还想知道计算润年的公式
 
呵呵,现在从纯 Pascal 开始学的人不多了:)
 

唉,很多人都是靠看源码学习的。有人甚至不知道集合,枚举。
 
后退
顶部