DECLARE FUNCTION ARM(N)
CLS
INPUT"ENTER ANY NUMBER";N
A=P
P=ARM
IF A=P THEN
PRINT"The given no is armstrong"
ELSE
PRINT"The given no is not armstrong"
END IF
END
FUNCTION ARM(N)
S=0
WHILE N<>0
R=N MOD 10
S=S+R^3
N=N\10
WEND
ARM=S
END FUNCTION
Subscribe to:
Post Comments (Atom)
My journey of Jagat Mandir School
13 Years of ExperiencE It is also said that school is next home of every child. "failing and learning" Teacher are like gods....
-
Dashain and tihar is the best festival i have celebrated in me life. Because it give time to visit our family member in one year and ce... -
Sericulture Seri culture is the cultivation of silk worms to produce silk. There are five major types of silk of commercial importance,...
No comments:
Post a Comment