1 files changed, 42 insertions, 0 deletions
diff --git a/rcc-legacy/tests/functional/84_palindrome_number.sy b/rcc-legacy/tests/functional/84_palindrome_number.sy
new file mode 100644
index 0000000..19aa459
--- /dev/null
+++ b/rcc-legacy/tests/functional/84_palindrome_number.sy
@@ -0,0 +1,42 @@
+int palindrome(int n)
+{
+    int a[4];
+    int j;
+    int flag;
+    j=0;
+    while(j<4)
+    {
+        a[j]=n%10;
+        n=n/10;
+        j=j+1;
+    }
+
+    if(a[0]==a[3] && a[1]==a[2])
+	{
+		flag=1;
+	}else{
+		flag=0;
+	}
+	return flag;
+}
+
+int main()
+{
+    int test;
+    test=1221;
+    int flag;
+    flag=palindrome(test);
+    if(flag==1)
+        putint(test);
+    else
+    {
+        flag = 0;
+        putint(flag);
+    }
+
+    flag = 10;
+    putch(flag);
+
+    return 0;
+    
+}