QBASIC PROGRAM

Write a program that check weather the supplied number is palindrom or not.

CLS
INPUT"Enter any number";N
A = N
S = 0
WHILE N< > 0
R = N MOD 10
S = S * 10 + R
N = N \ 10
WEND
IF A = S THEN
PRINT "The given number is palindrome"
ELSE
PRINT "The given number is not palindrome"
END IF
END

Comments

Popular posts from this blog

Experience of dashain

TEEJ

Visit to sericulture