Saturday, October 26, 2019


12.SUM OF DIGIT.


DECLARE SUB SUM (N)
CLS
INPUT “ENTER ANY NUMBER”;N
CALL SUM (N)
END

SUB SUM (N)
S=0
WHILE N<>0
R=N MOD 10
S=S+R
N=N/10
WEND
PRINT  “SUM OF DIGIT=”;S
END SUB


No comments:

Post a Comment

beautiful

Covid-19 Pandemic In Nepal

  Covid-19 Pandemic In Nepal Covid-19 Is the world wide pandemic in today's context.Not only Nepal but various country are suffering it....