Operator in QBASIC

An operator is a symbol which tells the computer to perform certain mathematical and logical calculation.

 Types of operator

  1. Mathematical Operators
  2. Relational Operators
  3. Logical Operators
1. Mathematical Operators
Opetrator Meaning Example
+ addition 2+2
- subtraction 5+2
* multiplication 2*2
/ division 2/2
\ Integer division (It gives the integer value) 2\2
MOD modulus (It gives remainder) 3 MOD 2
^ exponent 2^2


2. Relational Operator


Opetrator Meaning Example
< less than 2<3  
> greater than 5>2
<= less than or equal to 2<=3
>= greater than or equal to 2>=2
= equal to 2=2
<> not equal to 3 <> 2
3. Logical Operator



Opetrator Meaning Example
AND Logical AND
OR Logical OR
NOT Logical NOT

Comments

CM said…
Interesting site I have just completed a change due to having trouble controlling too many legacy computers ( TRS80 16k was the first. QUICK BASIC IS NOW INSTALLED ON 2 GB
SD MINI chip and it runs fine on any computer with a USB to SD mic adapter. Lots of room left for all my legacy programs. By saving the programs as txt files I can browse thru program structure on my Kobo e-reader anywhere with my feet up.
CM:\Old Guy
April 10, 2017 at 3:59 PM
CM said…
Interesting site I have just completed a change due to having trouble controlling too many legacy computers ( TRS80 16k was the first. QUICK BASIC IS NOW INSTALLED ON 2 GB
SD MINI chip and it runs fine on any computer with a USB to SD mic adapter. Lots of room left for all my legacy programs. By saving the programs as txt files I can browse thru program structure on my Kobo e-reader anywhere with my feet up.
CM:\Old Guy
April 10, 2017 at 4:00 PM
Post a Comment

Popular posts from this blog

PALINDROME AND ARMSTRONG PROGRAMS

120.  WAP to input any number and check whether the given no. is 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 A; "IS PALINDROME" ELSE PRINT A; "IS NOT PALINDROME" END IF END USING SUB PROCEDURE DECLARE SUB PALIN (N) CLS INPUT "ENTER ANY NUMBER"; N CALL PALIN (N) END SUB PALIN (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 A; "IS PALINDROME" ELSE PRINT A; "IS NOT PALINDROME" END IF END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION PALIN (N) CLS INPUT "ENTER ANY NUMBER"; N P = PALIN ((N)) IF P = N THEN PRINT N; "IS PALINDROME" ELSE PRINT N; "IS NOT PALINDROME" END IF END FUNCTION PALIN (N) S = 0 WHILE N < > 0 R = N MOD 10 ...
Read more

PROGRAM TO FIND SQUARE, CUBE, SQUARE ROOT AND CUBE ROOT OF GIVEN NUMBER

7. Display square of an input number. REM PROGRAM TO DISPLAY SQUARE OF AN INPUT NUMBER CLS INPUT “ENTER ANY NUMBER”; N S = N ^ 2 PRINT “SQUARE OF NUMBER ”; S END USING SUB PROCEDURE DECLARE SUB SQUARE (N) CLS INPUT “ENTER ANY NUMBER”; N CALL SQUARE(N) END SUB SQUARE (N) S = N ^ 2 PRINT “SQUARE OF NUMBER “; S END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION SQUARE (N) CLS INPUT “ENTER ANY NUMBER”; N S = SQUARE(N) PRINT “SQUARE OF NUMBER “; S END FUNCTION SQUARE (N) SQ= N ^ 2 SQUARE = SQ END FUNCTION 8. Display cube of an input number. REM PROGRAM TO DISPLAY CUBE OF AN INPUT NUMBER CLS INPUT “ENTER ANY NUMBER”; N C = N ^ 3 PRINT “CUBE OF NUMBER ”; C END USING SUB PROCEDURE DECLARE SUB CUBE (N) CLS INPUT “ENTER ANY NUMBER”; N CALL CUBE(N) END SUB CUBE (N) C = N ^ 3 PRINT “CUBE OF NUMBER “; C END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION CUBE (N) CLS INP...
Read more

input any string and reverse it, palindrome

221. WAP to input any string and reverse it. CLS INPUT "ENTER ANY STRING"; S$ FOR I = LEN(S$) TO 1 STEP -1 B$ = MID$(S$, I, 1) W$ = W$ + B$ NEXT I PRINT "REVERSED STRING IS "; W$ END USING SUB PROCEDURE DECLARE SUB REV (S$) CLS INPUT "ENTER ANY STRING"; S$ CALL REV(S$) END SUB REV (S$) FOR I = LEN(S$) TO 1 STEP -1 B$ = MID$(S$, I, 1) W$ = W$ + B$ NEXT I PRINT "REVERSED STRING IS "; W$ END SUB USING FUNCTION PROCEDURE DECLARE FUNCTION REV$ (S$) CLS INPUT "ENTER ANY STRING"; S$ PRINT "REVERSED STRING IS "; REV$(S$) END FUNCTION REV$ (S$) FOR I = LEN(S$) TO 1 STEP -1 B$ = MID$(S$, I, 1) W$ = W$ + B$ NEXT I REV$ = W$ END FUNCTION 222.    WAP to input any string and check whether the given string is palindrome or not. CLS INPUT "ENTER ANY STRING"; S$ FOR I = LEN(S$) TO 1 STEP -1 B$ = MID$(S$, I, 1) W$ = W$ + B$ NEXT I...
Read more