QBASIC PROGRAM TO FIND SUM OF DIGIT USING SUB.

DECLARE SUB SIM(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

Comments

Post a Comment

Popular posts from this blog

MY JOURNEY OF 11 YEARS WITH JM

Image
  Its been almost 11 years since I first entered this school. When I first entered this school holding my grandmother’s fingers with tears in my eyes. I still remember that day when I first entered principal sir’s office with my parents to give entrance. I started my journey with JM from grade U.K.G(2066 B.S). I still remember when I was walking through the down floor Durga Mam grabbed my hand and pulled inside class U.K.G. Since I was from a village, I didn’t know the rules and regulations of a boarding school. At that time one of my fellow friend Eunice Gurung helped me in studies as well as other activities. I learned speaking English slowly and adjusted in JM environment. After passing grade U.K.G, we were promoted to grade 1 and our class teacher was Roma mam. All the small children used to shiver hearing the name of Roma mam and Deepak sir. We were very afraid because our class teacher was Roma mam. But we were wrong. Roma mam was very polite and loving. She used t...
Read more

Teej

                                            Teej Teej is a festival celebrated by Nepali women, for the long life of her husband and long and firm relationship between them until the death this life and all the lives to come. Teej is observed for marital happiness, well-being of spouse and children and purification of own body and soul. Teej is  the most famous festival among Nepali women.  The folk music and dances add more flavor to traditional values of Teej. It is fascinating to see women, in “Red” dancing and singing on the street, going to temple in holy and fasting mood. Teej is also called Hari Talika Teej. This festival is celebrated by Nepali Hindu women all  across the world. How do we celebrate teej? The eve (first day of Teej)  is called  Dar Khane Din . On this day all the family members especi...
Read more
                                                             Qbasic program # Write a program that asks any number and calculates its factorial.      ClS      INPUT”ENTER ANY NUMBER ”;N       F=1       For I=1 to N       F=F*1       NEXT I         PRINT”Factorial=“;F        END        
Read more