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

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

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

N NE NEP NEPA NEPAL PATTERN

251.  WAP to display N NE NEP NEPA NEPAL USING SUB PROCEDURE DECLARE SUB PATTERN (S$) CLS S$ = "NEPAL" CALL PATTERN(S$) END SUB PATTERN (S$) FOR I = 1 TO LEN(S$) PRINT LEFT$(S$, I) NEXT I END SUB 252.  WAP to display L AL PAL EPAL NEPAL USING SUB PROCEDURE DECLARE SUB PATTERN (S$) CLS S$ = "NEPAL" CALL PATTERN(S$) END SUB PATTERN (S$) FOR I = 1 TO LEN(S$) PRINT RIGHT$(S$, I) NEXT I END SUB 253.  WAP to display NEPAL EPAL PAL AL L USING SUB PROCEDURE DECLARE SUB PATTERN (S$) CLS S$ = "NEPAL" CALL PATTERN(S$) END SUB PATTERN (S$) FOR I = LEN(S$) TO 1 STEP - 1 PRINT RIGHT$(S$, I) NEXT I END SUB 253.  WAP to display NEPAL NEPA NEP NE N USING SUB PROCEDURE DECLARE SUB PATTERN (S$) CLS S$ = "NEPAL" CALL PATTERN(S$) END SUB PATTERN (S$) FOR I = LEN(S$) TO 1 STEP - 1 PRINT LEFT$(S$, I) NEXT I ...
Read more