溫馨提示×

檢查給定年份是否是 PL/SQL 中的閏年

小云
100
2023-10-10 08:11:06
欄目: 云計算

以下是一個 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;
-- 輸出結(jié)果
IF is_leap_year THEN
DBMS_OUTPUT.PUT_LINE(year_number || '是閏年');
ELSE
DBMS_OUTPUT.PUT_LINE(year_number || '不是閏年');
END IF;
END;

在這個程序中，首先要求用戶輸入一個年份，然后根據(jù)閏年的定義進(jìn)行判斷。如果給定年份滿足閏年的條件，則將 is_leap_year 標(biāo)志設(shè)為 TRUE，否則為 FALSE。最后根據(jù) is_leap_year 的值輸出結(jié)果。

請注意，為了運行這個程序，需要在 PL/SQL 開發(fā)工具中啟用輸出（比如在 SQL Developer 中，需要打開 “View -> Dbms Output”）。

0 踩