PL/SQL में संख्या पैलिंड्रोम जांचने का कोड
एक संख्या पैलिंड्रोम होती है यदि वह आगे और पीछे से समान पढ़ी जाए (जैसे 12321)। PL/SQL में लूप और अंकगणितीय संक्रियाओं से इसे जांचा जा सकता है।
एल्गोरिदम
- मूल संख्या सहेजें
- संख्या को उल्टा करें (अंतिम अंक निकालकर नई संख्या बनाएं)
- मूल और उल्टी संख्या की तुलना करें
PL/SQL कोड उदाहरण
DECLARE
n NUMBER;
m NUMBER;
temp NUMBER := 0;
rem NUMBER;
BEGIN
n := 12321;
m := n;
WHILE n > 0 LOOP
rem := MOD(n, 10);
temp := (temp * 10) + rem;
n := TRUNC(n / 10);
END LOOP;
IF m = temp THEN
dbms_output.put_line('Palindrome');
ELSE
dbms_output.put_line('Not Palindrome');
END IF;
END;
आउटपुट
Palindrome
चरण-दर-चरण (12321 के लिए):
- n=12321, temp=0 → rem=1, temp=1, n=1232
- n=1232, temp=1 → rem=2, temp=12, n=123
- n=123, temp=12 → rem=3, temp=123, n=12
- n=12, temp=123 → rem=2, temp=1232, n=1
- n=1, temp=1232 → rem=1, temp=12321, n=0
- लूप समाप्त: m=12321, temp=12321 → बराबर → पैलिंड्रोम
नोट: यह PL/SQL (Oracle) कोड है। MySQL में इसी तर्क के लिए स्टोर्ड प्रोसीजर या एप्लिकेशन-स्तर कोड लिखें।