QBasic Programming

To display reverse of digit

CLS

INPUT"Enter any number";N

S=0

WHILE N < >0

R=N MOD 10

S=S*10+R

N=N \ 10

WEND

PRINT "Reverse of digits";S

END