=> CLS
INPUT "Enter any number"; N
P = 1
WHILE N<> 0
R = N MOD 10
P = P*R
N = N\10
WEND
PRINT "Product of digits="; P
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...
-
=> CLS FOR I = 1 TO 5 FOR J = 1 TO I PRINT J ; NEXT J PRINT NEXT I END Posted 1
-
=> CLS INPUT "Enter any number"; N FOR I = 1 TO N IF N MOD I = 0 THEN PRINT I NEXT I END
-
My Experience of educational tour An educational tour is a fun – filled experience. As the tour may be too far away p...
No comments:
Post a Comment