16. Armstrong

CLS
INPUT ''Enter any number''; N
A = N
S = 0
WHILE N < > 0
R = N MOD 10
S = S + R ^ 3
N = N / 10
WEND
IF A = S THEN
PRINT ''The given number is armstrong''
ELSE
PRINT ''The given number is not armstrong''
END IF
END

Comments

Popular posts from this blog

Experience of not going tour

My father