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 2)½ log 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 |
, .
|
|
. | |