PL/SQL में दिए गए वर्ष को लीप वर्ष है या नहीं जांचें

PL/SQL में लीप वर्ष जांचने का एल्गोरिदम और कोड

PL/SQL में लीप वर्ष जांचने के लिए मानक एल्गोरिदम: वर्ष 4 से विभाज्य हो और 100 से विभाज्य न हो, या 400 से विभाज्य हो।

एल्गोरिदम

isLeapYear(year):
    BEGIN
        IF year 4 से विभाज्य है AND 100 से विभाज्य नहीं है THEN
            यह लीप वर्ष है
        ELSE IF वर्ष 400 से विभाज्य है THEN
            यह लीप वर्ष है
        ELSE
            यह लीप वर्ष नहीं है
        END IF
    END

PL/SQL कोड उदाहरण

DECLARE
    year NUMBER := 2012;
BEGIN
    IF MOD(year, 4) = 0
        AND MOD(year, 100) != 0
        OR MOD(year, 400) = 0 THEN
        dbms_output.Put_line(year || ' is leap year ');
    ELSE
        dbms_output.Put_line(year || ' is not leap year.');
    END IF;
END;

आउटपुट

2012 is leap year

व्याख्या: 2012, 4 से विभाज्य है (2012/4=503), 100 से विभाज्य नहीं है (2012/100=20.12), इसलिए लीप वर्ष है। 1900, 4 से विभाज्य है लेकिन 100 से भी विभाज्य है और 400 से नहीं, इसलिए लीप वर्ष नहीं। 2000, 400 से विभाज्य है, इसलिए लीप वर्ष है।

नोट: यह PL/SQL (Oracle) कोड है, MySQL के लिए नहीं। MySQL में इसी तर्क का उपयोग स्टोर्ड प्रोसीजर या एप्लिकेशन कोड में किया जा सकता है।