Sunday, October 17, 2021

[Download PDF] Computer Science Book Gread-10 in Nepali Language

 If you are searching for class 10 Computer Science in Nepali pdf for free download then you are at the right page. This book is soley published by Janak Publication Under Curriculum Development Center (CDC) of Nepal and we do not have any rights to it. This book is only for educational purpose. 

[Download PDF] Computer Science Book Grade-10 in English Language

 If you are searching for class 10 Computer Science pdf for free download then you are at the right page. This book is solely published by Janak Publication Under Curriculum Development Center (CDC) of Nepal and we do not have any rights to it. This book is only for educational purpose. 

Thursday, October 14, 2021

QBASIC pattern program to print *****, ****, ***, **, * (SUB/FUNCTION)


QBASIC pattern program to print the stars in right angle triangle shape (SUB/FUNCTION)

QBASIC Program to print the stars pattern in Pyramid shape (SUB/FUNCTION) 1

QBASIC Program to print the pattern 11111, 1111, 111, 11, 1 (SUB/FUNCTION)

QBASIC Program to print the pattern 1, 11, 111, 1111, 11111 (SUB/FUNCTION)

OUTPUT

QBASIC Program to print the pattern 2, 22, 222, 2222, 22222 (SUB/FUNCTION)

OUTPUT

QBASIC Program to print the pattern 55555, 4444, 333, 22, 1 (SUB/FUNCTION Procedure)

OUTPUT

QBASIC Program to print the pattern 54321, 5432, 543, 54, 5 (SUB/FUNCTION Procedure)

OUTPUT

QBASIC Program to print the pattern 5, 54, 543, 5432, 54321 (SUB/FUNCTION Procedure)

OUTPUT

QBASIC Program to print the pattern 12345, 1234, 123, 12, 1 (SUB/FUNCTION Procedure)

OUTPUT

Wednesday, October 13, 2021

QBASIC Program to print the pattern 1, 22, 333, 4444, 55555 (SUB/FUNCTION Procedure)

OUTPUT

Qbasic Program to print the pattern 1, 12, 123, 1234, 12345 (With SUB/FUNCTION Procedure)

OUTPUT

Qbasic Program to print 123454321, 1234321, 12321, 121, 1 [Hint: insert (;) at the end of PRINT a*a; to print in Horizontally] (SUB/Function)

OUTPUT

QBASIC Program to Print the Display the Numeric Series 55555, 5555, 555, 55, 5 (SUB/FUNCTION Procedure)

CLS
n = 55555
FOR I = 1 TO 5
     PRINT n;
     n = n \ 10
NEXT I
END

QBASIC Program to Print the series 7, 22, 11, 34, 17, 52, 26, 13, 40, 20 (SUB/FUNCTION Procedure)

CLS
a = 7
FOR i = 1 TO 10
     PRINT a;
     IF a MOD 2 = 0 THEN
          a = a \ 2
     ELSE
          a = a * 3 + 1

QBASIC Program to display simple interest (SUB/FUNCTION Procedure)

CLS
PRINT "Enter the following... "
INPUT "Principle : "; p
INPUT "Time : "; t
INPUT "Rate : "; r
i = (p * t * r) / 100
PRINT "Simple Interest (I) = "; i
END

QBASIC Program to calculate the area of triangle when three sides are given

CLS
INPUT "Enter the value of first side : "; x
INPUT "Enter the value of second side : "; y
INPUT "Enter the value of third side : "; z
s = (x + y + z) / 2
a = (s * (s - a) * (s - b) * (s - c)) ^ (1 / 2)

QBASIC Program to print the area of parallelogram (Using SUB/FUNCTION Procedure)

CLS
INPUT "Enter Breadth : "; b
INPUT "Enter Height : "; h
a = b * h
PRINT "Area of Parallelogram is : "; a
END

QBASIC Program to print the area of triangle (with SUB/FUNCTION Procedure)

CLS
INPUT "Enter Breadth : "; b
INPUT "Enter Height : "; h
a = 1 / 2 * (b * h)
PRINT "Area of Triangle is "; a
END

QBASIC Program to print the area of 4 walls (SUB/FUNCTION Procedure Demo)

CLS
INPUT "Enter Breadth : "; b
INPUT "Enter Height : "; h
area = 2 * h * (l + b)
PRINT "Area of 4 walls = "; area
END

Monday, October 11, 2021

Program to print square root & cube root of an input number (QBASIC)

1. Program to print Square Root of Given Number.

CLS
INPUT "Enter any Number : "; n
sr = n ^ (1 / 2)
PRINT "Square Root = "; sr
END

Program to print square & cube of an input number (QBASIC)

Program to print Square Number of Given Number.

CLS
INPUT "Enter any number : "; n
s = n ^ 2
PRINT "Square = "; s
END

QBASIC Program To check the given number is divisible by 4 or not (SUB & FUNCTION Procedure)

CLS
INPUT "Enter a number"; n
x = n MOD 4
IF x = 0 THEN
     PRINT "The given number is exactly divisible by 4";
ELSE
     PRINT "The given number is not exactly divisible by 4";

QBASIC program to display area of a rectangle by (SUB & FUNCTION Procedure)

CLS
INPUT "Enter Length : "; l
INPUT "Enter Breadth : "; b
area=l*b
PRINT "Area = "; area
END

QBASIC program to Print the Perfect Square numbers from 1 to 100 (1, 4, 9, 16, 25, 36, 49, 64, 81, 100)

In mathematics, a square number or perfect square is an integer that is the square of an integer. In other words, it is the product of some integer with itself. For example, 9 is a square number, since it equals 32 and can be written as 3 × 3.

CLS
FOR i = 1 TO 100
     n = SQR(i)

QBASOC Program to print whether the given number is Prime or Composite

CLS
INPUT "Enter any Number "; n
FOR i = 1 TO n
     IF n MOD i = 0 THEN c = c + 1
NEXT i
IF c = 2 THEN
     PRINT "Prime Number"

Program to print the given string in Reverse Order (QBASIC)

CLS
INPUT "Enter any String "; s$
FOR i = LEN(s$) TO 1 STEP -1
     r$ = MID$(s$, i, 1)
     b$ = b$ + r$

Program to print the Numeric Series 3, 10, 5, 16, 8 (Hill-stone Number)

Using FOR...NEXT

CLS
n = 3
FOR i = 1 TO 5
     PRINT n;
     IF n MOD 2 = 0 THEN
          n = n / 2

Program to Print the Fibonacci Series 1, 1, 2, 3, 5, 8 ... up to 10th term

Using FOR...NEXT

CLS
x = 1
y = 1
PRINT x; y;
FOR i = 1 TO 10
     z = x + y
     PRINT z;
     x = y

Write a program to print the numeric series 0.11111, 0.1111, 0.111 .... 0.1

Using FOR...NEXT

CLS
n = 0.11111
FOR i = 1 TO 5
     PRINT n;

WAP to print 0.1, 0.11, 0.111 .... up to 7th term.

Using FOR...NEXT

CLS
a = 0.1
FOR i = 1 TO 7
     PRINT a;

Write a program to print 5, 125, ... up to 7th term (QBASIC)

Using FOR...NEXT

CLS
n = 5
FOR i = 1 TO 7
     PRINT n;

Write a Program to Enter any two numbers and print average number

QBASIC Program to get any two numbers from the user and print the average. 

CLS
INPUT "Enter First Number: "; a
INPUT "Enter Second Number: "; b 
av=(a+b)/2

Write a Program to Enter any two numbers and display the sum

QBASIC Program to get any two numbers from the user and print their sum on the screen. 

CLS
INPUT "Enter First Number: "; a
INPUT "Enter Second Number: "; b 
s=a+b 

Friday, October 8, 2021

QBASIC File Handling Appending Data File Example

Write a program to add some new records in the existing data file STUDENT.DAT. The program should prompt to the user for adding next records. 

CLS
OPEN "STUDENT.DAT" FOR APPEND AS #1
DO
INPUT "Enter Name : "; n$
INPUT "Enter Class : "; c

QBASIC File Handling Read Data from Data File Example

Write a program to display all the records of data file STUDENT.DAT

CLS
OPEN "STUDENT.DAT" FOR INPUT AS #1
PRINT "Name", "Class", "Roll No", "Address"
DO WHILE NOT EOF(1)

QBASIC File Handling Write Data into Data File Example

Write a program to create a sequential data file STUDENT.DAT then, store Name, Class, Roll number, and Address of the student

CLS
OPEN "STUDENT.DAT" FOR OUTPUT AS #1
INPUT "Enter Name : "; n$
INPUT "Enter Class : "; c

Friday, October 1, 2021

WAP to input any string and count total no. of consonant.

QBASIC Program to input any string from the user and count and print the total number of consonant letter. 

CLS
INPUT "Enter any String : "; s$
c = 0
FOR i = 1 TO LEN(s$)
      r$ = MID$(s$, i, 1)
      c$ = UCASE$(r$)

WAP to input any string and count total no. of vowels.

QBASIC Program to input any string from the user and count the total number of vowel letters from the given string and print the total number of vowel letter. 

CLS
INPUT "Enter any String : "; s$
c = 0
FOR i = 1 TO LEN(s$)
      r$ = MID$(s$, i, 1)
      c$ = UCASE$(r$)

[Download PDF] Computer Science Book Gread-10 in Nepali Language

 If you are searching for class 10 Computer Science in Nepali pdf for free download then you are at the right page. This book is soley publi...