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

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

DECLARE year_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 THEN is_leap_year := TRUE; END IF; -- 输出结果 IF is_leap_year THEN DBMS_OUTPUT.PUT_LINE(year_number || '是闰年'); ELSE DBMS_OUTPUT.PUT_LINE(year_number || '不是闰年'); END IF; END; 

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

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