检查给定年份是否是 PL/SQL 中的闰年

   2025-02-20 6130
核心提示:以下是一个 PL/SQL 程序,用于检查给定的年份是否是闰年:DECLAREyear_number NUMBER;is_leap_year BOOLEAN := FALSE;BEGIN-- 提

以下是一个 PL/SQL 程序,用于检查给定的年份是否是闰年:

DECLAREyear_number NUMBER;is_leap_year BOOLEAN := FALSE;BEGIN-- 提示用户输入年份year_number := &year_number;-- 判断闰年的条件:-- 1. 能被4整除,但不能被100整除;-- 2. 能被400整除。IF (MOD(year_number, 4) = 0 AND MOD(year_number, 100) != 0) OR MOD(year_number, 400) = 0 THENis_leap_year := TRUE;END IF;-- 输出结果IF is_leap_year THENDBMS_OUTPUT.PUT_LINE(year_number || '是闰年');ELSEDBMS_OUTPUT.PUT_LINE(year_number || '不是闰年');END IF;END;

在这个程序中,首先要求用户输入一个年份,然后根据闰年的定义进行判断。如果给定年份满足闰年的条件,则将 is_leap_year 标志设为 TRUE,否则为 FALSE。最后根据 is_leap_year 的值输出结果。

请注意,为了运行这个程序,需要在 PL/SQL 开发工具中启用输出(比如在 SQL Developer 中,需要打开 “View -> Dbms Output”)。

 
 
更多>同类维修知识
推荐图文
推荐维修知识
点击排行
网站首页  |  关于我们  |  联系方式  |  用户协议  |  隐私政策  |  网站留言