=> CLS
INPUT "Enter any number"; N
S = 0
WHILE N<> 0
R = N MOD 10
S = S+R
N = N\10
WEND
PRINT "Sum of digits="; S
END
Subscribe to:
Post Comments (Atom)
Experience
My Experience of educational tour An educational tour is a fun – filled experience. As the tour may be too far away p...
-
My Experience of educational tour An educational tour is a fun – filled experience. As the tour may be too far away p... -
=> CLS INPUT "Enter any number"; N S = 0 WHILE N<> 0 R = N MOD 10 S = S+R N = N\10 WEND PRINT "Sum of digits="...
-
=> CLS INPUT "Enter length";L A=L^2 PRINT "Area of square";A END
No comments:
Post a Comment