ตรวจสอบว่าตัวเลขเป็น Palindrome ใน PL/SQLs . หรือไม่

ในส่วนนี้เราจะมาดูวิธีการตรวจสอบว่าตัวเลขเป็น Palindrome หรือไม่โดยใช้ PL/SQL ในโค้ด PL/SQL คำสั่งบางกลุ่มจะถูกจัดเรียงภายในบล็อกของการประกาศที่เกี่ยวข้อง

ตัวเลขจะเป็นพาลินโดรมถ้าตัวเลขนั้นและส่วนหลังของตัวเลขนั้นเหมือนกัน สมมติว่าเป็นตัวเลข 12321 นี่คือพาลินโดรม แต่ 12345 ไม่ใช่พาลินโดรม

ตัวอย่าง

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