Project Work

My Experience On Tour To Ghalegaun And  Pokhara On 22nd Falgun 2072, Jagat Mandir School organized an educational tour to Ghalegaun and Pokhara for Grade 9 students for 4 days 3 nights. 25 students along with 4 teachers participated in it. 1st day: The first day was not so fun because we spent most of the time in our school bus. We travelled by school bus upto Besisahar then we took local jeep upto Ghalegaun which was 2 hours travel. After reaching Ghalegaun we were welcomed by the locals and rested in homestays. The first day went quickly.   2nd day: On second day we went to Ghalegaun view tower to see the view of the sunrise and the mountains. We travelled the village along with our guide. We visited museum, tea garden, temples etc. Then we went back to our homestays, had lunch and got farewell from the locals. Our walking journey started, we walked from Ghalegaun to Besisahar . We reached Besisahar...

Programming Concept QBASIC with Output: 1) WAP to enter any string and reverse it. CLS PRINT "DOLKAR" INPUT "ENTER ANY WORD"; A$ FOR I = LEN(A$) TO 1 STEP -1 B$ = MID$(A$, I, 1) C$ = C$ + B$ NEXT I PRINT "REVERSED WORD="; C$ END 2) WAP to enter any string and check whether the given string is palindrome or not. CLS PRINT "DOLKAR" INPUT "ENTER ANY STRING"; A$ FOR I = LEN(A$) TO 1 STEP -1 B$ = MID$(A$, I, 1) C$ = C$ + B$ NEXT I IF A$ = C$ THEN PRINT "THE GIVEN STRING IS PALINDROME" ELSE PRINT "THE GIVEN STRING IS NOT PALINDROME" END IF END 3) WAP to display the shortest word among three numbers. CLS PRINT "DOLKAR" INPUT "ENTER ANY WORD"; A$ INPUT "ENTER ANY WORD"; B$ INPUT "ENTER ANY WORD"; C$ IF LEN(A$) < LEN(B$) AND LEN(A$) < LEN(C$) THEN PRINT A$; "IS SHORTEST WORD" ELSEIF LEN(B$) < ...

Programming Concept QBASIC: 1.        Input any string and reverse it. CLS INPUT "Enter any word"; A$ FOR I = LEN(A$) TO 1 STEP -1 B$ = MID$(A$, I, 1) C$ = C$ + B$ NEXT I PRINT "Reversed word = "; C$ END 2.        Input any string and check whether the given string is palindrome or not. CLS INPUT "Enter  any word"; A$ FOR I = LEN(A$) TO 1 STEP -1 B$ = MID$(A$, I, 1) C$ = C$ + B$ NEXT I IF A$ = C$ THEN PRINT  "The given word is palindrome"  ELSE PRINT  "The given word is not a palindrome” END IF END 3.        Count total no. of vowels in a given string . CLS INPUT "Enter any word"; A$ FOR I = 1 TO LEN(A$) B$ = MID$(A$, I, 1) C$ = UCASE$(B$) IF C$ = "A" OR C$ = "E" OR C$ = "I" OR C$ = "O" OR C$ = "U" THEN C = C + 1 NEXT I PRINT "Total number of vowels= "; C END 4.  ...

                  Programming Concept QBASIC:                                                    1)NEPAL                                 ::::    CLS                                   NEPA                         ...