F# program to check Palindrome Number

Program

open System
let checkPalindrome number = 
    let mutable num = number
    let mutable reminder = 0
    let mutable reverse = 0
    while num > 0 do
        reminder <- num % 10;
        reverse <- (reverse * 10) + reminder;
        num <- num / 10;
    reverse
Console.Write("Enter the number to check whether it is palindrome or not:\t")
let number = Int32.Parse(Console.ReadLine())
let result = checkPalindrome number
if(number = result) then Console.WriteLine("Given number is Palindrome\t{0}", result);
else Console.WriteLine("Given number is not Palindrome:\t{0}", result);

Output 1

Enter the number to check whether it is palindrome or not: 2345
Given number is not Palindrome: 2345

Output 2

Enter the number to check whether it is palindrome or not: 78987
Given number is Palindrome: 78987