.


:




:

































 

 

 

 


(PRINT USING)




QBASIC

 

, ,
QBASIC 26 A Z 0 9
+ - * \ / ^
< > = <= >= <>
,.;: () # $ & %! <>
() , ,
,

 

 

, .

, , .

 

INTEGER % 32768 + 32768
LONG & -2147483648 + 2147483648
SINGLE ! 8,43 10-37 3,37 1038
DOUBLE # 4,19 10-307 1,67 10308
STRING $ 32 767
BOULEAN   - 1, 0

 

 

 

( ) ( )
, , . ,
()
(3.1415, 25, -7.3) , (CAT, *L*, 321)

 

( )

() 40 , . - %, &,!, #, $. SINGLE.
C% ( ), , ,
PR%(3) ( ), , ,
FA& ( ), , ,
Z6D&(4,5) ( ), , ,
K3T ( ), , ,
DOG!
(K,L,M) ( ), , ,
LIRA# ( ), , ,
DON$ ( ),
     

 

[ ] [ ( [, [, ] ]) ]

  ,
SAH%, N17S, CO#, 2GLE, tent$, PI, INT*EGG, ER(1, 6), PI$R, Z&, 628, N8F5!

CONST

CONST

 

CONST = [, = [ ,... ]]

 

, (, , , ^).

CONST PI = 3.14, MT% = 2, TEXT$ = ''''

CONST TP = PI / 2

DIM

DIM

DIM

DIM [ SHARED ] [, [ ,... ] ]

 

[SHARED] , , .

 

DIM SHARED S!, R%, KL#, telefon$, y

DIM ST%, Z52(1 6), M(0 5, 0 7)

 

 

       
 
   
 


(..)

=

(..)

 

 

R = 4 * PI ..

Z% = 2 / COS (R) ..

5 = R + Z% ..

L$ = Ŕ ..

 

 

 

| a | ABS (A) log b a = ln a / ln b lg a = ln a / ln 10  
SQR (A)
ln a LOG (A)
e a EXP (A)
sin (a) SIN (A)   ctg (a) = 1 / tg (a) = tg 1 (a)  
cos (a) COS (A)
tg (a) TAN (A)
arctg(a) ATN (A)
int a INT (A) , int (2,3) = 2, int (-2,3) = - 3
fix a FIX (A) fix (2.3) =2, fix (-2.3) = -2
sgn a SGN (A) , : 1, 0, 1 SGN (A<0) = -1, SGN (A=0) = 0, SGN (A>0) = 1

 

: , .

.

.

 

(..)
(..)
(..)

 

( ), , , , ,
(%,!, #) INTEGER h% +ABS(2*b%) SINGLE - sin(f) - k! * 5 DOUBLE - cos(m#) / g#

 

1.
2.
3. (^)
4. , (* /)
5. (\) ( 5 \ 3 = 1)
6. (MOD), (: 5 MOD 3 = 2)
7. , (+ -)

.

, .. a * b / c, a b / c.

, .

 

(A + B) / (C + D)

A * B / (C * D) A * B / C / D

A^ (2*M) SQR(X+A) + (5*X)^(1/(3+C))

 

COS(AL+BT)*SIN((DL+FI)^C) +TAN(2*PI)^3

 

1/TAN(3*PI)-ATN((PI-GM)^5) + ATN(PI+GM)^4

 

LOG(A)+LOG(C^2)+LOG(D)^3

 

ABS(2 - LOG(3*X) / LOG(10))

 

LOG((A+X)^C)/ LOG(10) + (LOG(A-D)/LOG(10))^X

 

LOG((2*X+A)^C)/ LOG(M+2) + (LOG(X+3*A)/LOG(M+B))^(D+2)

 

ABS(X*A^C+B) EXP(A+3) D^(X+3*A)+

A^ EXP(3*X)

 

ABS (SQR (SIN(X+2)^2-TAN(Y^3))-(LOG(2+X)/LOG(1-Y))^(1/B))^3/X →

 

1 QB
  b b - a - m + +     n (2+ d)½ cos (2 x - (3+h) n 2log 2n (a + s)     ½ - y ½  
2
(3*COS(2-A) ^D+R/(TAN((P*X)^C)+H)5.2 * W ^(F/(M+2)) +SQR(ATN(3*X+T)))/3*D     EXP(A+B)/2.5 * X ^ 3 / X + ABS(LOG(2+C)/LOG(A^T))+ COS(A*X ^ D)

 

 

3
  : = 2, = 3, M = < >, N = < > > AND 2 * < = 4 OR - < = 0 AND 6 / B < > 8 AND N   NOT M OR + 1 > AND > = 2 - OR NOT N AND < =

 

 

, .
: FALSE - (0)
TRUE - (1)

 

1.
2.
3. - NOT - AND - OR - EQV

 

 

A
B
NOT A
A AND B
A OR B
A EQV B

 

= 2, = 5

> 1 -

+ 2 < 3 < > = + 2 > = 3 / < = 2.5

                   
     
     
 


 

= 2, = 5

NOT > 1 -

 
 


 

NOT + 2 < 3 NOT < > NOT = NOT + 2 > = 3 NOT / < = 2.5

                                       
         
                 
 
 
 


           
     
 


 

 

 

= 2, = 5, = 3 = 2, = 5, = 7

 

> AND < = > AND < =

       
   


 

= 2, = 5, = 3 = 2, = 5, = 7

 

< OR > = < OR > =

       
   


 

= 2, = 5, = 3 = 2, = 5, = 7

 

< EQV > = < EQV > =

       
   
 


 

: 2,3 > SIN (1,57) AND COS (0) > = 5

2,3 > 0,949 1 > = 5


 

0,5 ^ 3 < EXP (2,4) OR SIN (0) < 0

0,015625 < 11,02318 0 < 0


-

 

NOT 2 < > SQR(4) AND LOG (1) < 3

2 < > 2 0 < 3

       
   
 


 
 


 

 

 

.. (, ) , ( ) , ''+''.

 

() , , , , : '' '', ''S='', '' ''

''+'' .

  CONST A$ = '''' PRINT'' '' + A$
  PRINT ''IBM''+CHR(80)+CHR(67) IBM PC
  PRINT'''' + '' ''

 

,

 
 


,

 
 


, END

       
 
   
 


( ).

 
 


 

, () () .

.

QBASIC

( )

 

 

CLS ( ).

(INPUT)

(? ).

ENTER.

;

INPUT [ , ] [, [, ... ] ]

 

( ) ''''

; - ''? ''

, - ''? ''

() , ( ).

 

INPUT .

 

  INPUT , B, C ?_
  INPUT , B, C; , B, C , B, C? _
  INPUT , B, C, , B, C , B, C_
  INPUT , B, C, , B, C , B, C? _

 

(READ DATA)

 

DATA .

DATA [, c [, ... ] ] c - .

.

 

READ

READ [, a [, ... ] ]

a , DATA. .

READ DATA, , DATA, .

READ DATA.

READ , DATA, .

READ A, H%, X, Z READ FF, R& DATA 10.1, 77 DATA 3.5, 0.06, 26.78 DATA 39 A = 10.1 H% = 77 X = 3.5 Z = 0.06 FF = 26.78 R& = 39

(PRINT) (LPRINT)

;;

PRINT [ [, [ ,... ]] ]

 

, .

; -

, - .

 

, ; , .

 

14 .

 

. , ''-''.

 

  PRINTA=; A; B=; B A= _3_B= _-5
  PRINTA=; A, B=; B   A= _3 _ _ _ _ _ _ _ _ _ _ B= _-5_ _ _ _ _ _ _ _ _
       
 
   


1- 2 -

  PRINT ; V; PRINT . . PRINT ; ; , PRINT ܔ; F     _220_ . . _10_ _ _ _ _ _ _ _30_ _
       
   


1- 2 -

 

, PRINT LPRINT.

 

(PRINT USING)

(LPRINT USING)

PRINT USING [; ]

 

- , . .

- .. .., , .

[; ] .

 

# - . , .

. .

, 3 (100,000,000).

+ - + -.

- - .

** - * .

$$ - $ .

& - .

! -

\\ - , \ \.

 

.

.

 

T=132:V%=34: X=23.82:A=10:B=11:C=12: S =9835647.328: Q = -3456.23 R$ = '': U$ = '''': D=3: K=5 PRINT USING + # # # # ; T PRINT USING # # #. # # ; V PRINT USING # # #. # # ; X PRINT USING +# # # #- # #+; A; B; C PRINT USING # # # # # # #,. # # #; S PRINT USING # # # # # # #,; S PRINT USING # # # # # # ; S PRINT USING **# # #. # # - ; Q PRINT USING **# # #. # # - ; X PRINT USING & ; R$ PRINT USING ! ; R$ PRINT USING \... \ ; R$ PRINT USING . & # # . # # ; U$; D; K     _+132 _23.82 _34.00 +10 11- 12+ 9,835,647.328 9,835,647 % 9,835,647 *3456.23- **23.82- . 3 . 5

 

, .

 

 
 

 


 

                               
     
           
         
               
 
 
 
 

 

 


.




:


: 2015-11-05; !; : 897 |


:

:

.
==> ...

1313 - | 1260 -


© 2015-2024 lektsii.org - -

: 0.196 .