Posts

Showing posts from 2019

to display 1,12,123,1234,12345

CLS   FOR I = 1 TO 5 FOR J = 1 TO I PRINT J ; NEXT J PRINT  NEXT I END

to display 1,11,111,1111,11111

CLS A = 1 FOR I = 1 TO 5 PRINT A A = A*10+1 NEXT I END

to display 5,10,15,20,...10th term

CLS A = 5 FOR I = 1 TO 10 PRINT A A = A+5 NEXT I END

to display 1,4,9,16,...10th term

CLS FOR I = 1 TO 10 PRINT I ^ 2 NEXT I  END

to display 1,1,2,3,5,...10th term

CLS FOR I = 1 TO 5 FOR J = 1 TO I NEXT I ; NEXT J PRINT NEXT I  END

wap to display multiplication table

CLS INPUT "Enter any number"; N FOR I = 1 TO 10 PRINT N ; "X' ; I ; "=" ; N*I NEXT I END

wap to display factorial

CLS INPUT "Enter any number"; N F = 1 FOR I = 1 TO N F = F*I NEXT I PRINT "Factorial="; F END

wap to display factors

CLS INPUT "Enter any number"; N FOR I = 1 TO N IF N MOD I = 0 THEN PRINT I NEXT I END

wap to display prime or composite

CLS INPUT "Enter any number"; N C = 0 FOR I = 1 TO N IF N MOD I = 0 THEN C = C+1 NEXT I IF C = 2 THEN PRINT "The number is prime" ELSE PRINT "The number is composite" END IF end

wap to display 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 "The number is armstrong" ELSE PRINT "The number is not armstrong" END IF END

wap to display palindrome or not

CLS INPUT "Enter any number"; N A = N S = 0 WHILE N <> 0 R = N MOD 10 S = S*10+R N = N\10 WEND IF A= S THEN PRINT " The number is palindrome" ELSE PRINT "The number is not palindrome" END IF END

wap to display reverse digits

CLS INPUT "Enter any number"; N S = 0 WHILE N<> 0 R = N MOD 10 S = S*10+R N = N\10 WEND PRINT "Reverse of digits="; S END

wap to display 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

WAP to display sum of digits

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

WAP to display gretest among three number

CLS INPUT "Enter any three number"; A, B, C IF A>B AND A>C THEN PRINT "The greates number is"; A ELSEIF B>A AND B>C THEN PRINT "The greatest number is"; B ELSE PRINT "The greatest number is"; C END IF END

wap to display odd or even

CLS INPUT "Enter any number"; N IF N MOD 2 = 0 THEN PRINT "The number is even" ELSE PRINT "The number is odd" END IF END

wap to display positive,negative or zero

CLS INPUT "Enter any number"; N IF N>0 THEN PRINT "The number is positive" ELSEIF N<0 THEN PRINT " The number is negative" ELSE PRINT "The number is zero" END IF END

wap to find volume of cylinder

CLS INPUT "Enter the radisu"; R INPUT "Enter the height"; H V =  22/7*R^2*H PRINT "Volume of cylinder="; V ENDwap to

wap to find the volume of cube

CLS INPUT "Enter the length"; L V = L^3 PRINT "Volume of cube="; V END

wap to find the volume of box

CLS INPUT "Enter the length"; L INPUT "Enter the breadth": B INPUT "Enter the height"; H V = L*B*H PRINT "Volume of box="; V END 

wap to calculate area of 4 wall

CLS INPUT "Enter the length"; L INPUT "Enter the breadth"; B INPUT "Enter the height"; H A = 2*H*(L+B) PRINT "Area of four walls="; A END

wap to calculate area of square

CLS INPUT "Enter the length"; L A = L^2 PRINT "Area of square="; A END

wap to calculate area of triangle

ClS INPUT "Enter base"; B INPUT "Enter height"; H A = 1/2*B*H PRINT "Area of triangle="; A END

wap to calculate area of circle

CLS INPUT "Enter the radius"; R A = 22/7*R^2 PRINT "Area of circle="; A End

WAP TO CALCULATE AREA OF RECTANGLE

CLS INPUT"enter length";L INPUT"enter breadth";B A=L*B PRINT"area of rectangtle";a end

My Father

Image
                        MY FATHER My father name is Deepak acharya. He is 35 year old.He is familiar to others and helpful too. ... Love you .... He has been full filling all of my wishes . He help me in every things. He choose that what is good and what is bad for me. He is ideal person in my life. He is kind and helpful.  He is like i god for me .Thank you dad for your help and support towards me .You are the angle for me . Thank you dad. He is my hero, He is my backbone., He is my supporter., I LOVE U DAD...

My Day With Nepali Police

The police of Nepal is responsible for maintaining law .Sarbendra Khanal is the current IGP of Nepal police. So, to make the Kathmandu valley one of the safest valleys in the world Nepal Police Force is trying there best.   All the things were relatable to many of our friends. He gave us knowledge about Cyber Crime. As being a teenagers, I strongly agreed that most of our time is spend by using social media. It is not good .  We should not misuse it but we can use it for many educatinal purpose, business purose etc.  After that class we were shown the control room. All the CCTV camera photos were recorded there. After that we were taken to another place.Even they take us in dogs training center.  It was the place were all the police dogs get training. Altogether there were 81 dogs in that divison. 8 breeds and 4 types of dogs were kept there. All the dogs were trained . They showed us some of the dogs training to us. We watched the horse to. I would thank o...

Manuram nitrya

                                             Aandhiko manuram nitrya Our school  gave us a goloden opportunity to watch drama which is based on teenagers life. Students of grade 8,9 and 10 along with 5 teachers were taken as audience. We were taken at Battisputali on 9th May, 2019. The name of our drama was "Aandhiko Manoram Nritya".     This drama is based on the life of teenagers. Where we came to know different things which we were going to be suffered from this life.It shows us how we are growing with our friends in bad company.  They feel the pressure of studies and they started to do nonsense activites like smoking, taking drugs and falling in love. Nowadays, Yes all the teenagers as well as us we are involved in the wrong activities like falling in love. smoking. using more electronic gadgets and all. This drama shows us that we s...

Momo making

It’s not often that we actually try out the demonstrated recipe or take advice from the real-life cooks that we watch. Students and young adults in general forget about the importance and the benefits of cooking for themselves. Learning how to cook is one of the most important skills a person can have. When you cook for yourself you learn to enjoy healthy foods that you’ve always hated. It’s so satisfying knowing that I have a life skill and that at the end of the day I’ve done something productive. Cooking keeps us self-sufficient, healthy, and creative and boosts up our social skills as well. The main objective of this project “Preparation and Distribution of mo: mo”is to make we students understand the value of food with its making procedures. We students; some are known how to cook food and many others of us are unknown how to cook food. So, this project is being done to make students like us get some ideas about importance of cooking in our life.  We are altogether 47 studen...