Tuesday, 22 October 2019

13) product of digits.

=> 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
at

No comments:

Post a Comment

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...

  • 16) Armstrong or not.
    =>  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 ...
  • 5) Volume of box.
    => CLS INPUT "Enter length ";L INPUT "Enter breadth";B INPUT "Enter height";h V=L*B*H PRINT "Volu...
  • 8) Area of 4 walls.
    => CLS INPUT "Enter length";L  INPUT "Enter breadth";B  INPUT "Enter height";h  A=2*H*(L+B) PRINT ...