4. .
QBasic.
QBasic , . "" "", . QBasic 100 , , . , , , .
Basic, 249 . , " " , 80 ( , ). , 80 , _ . . , , .
, , , . ,
S=PI*R2
L=2*PI*R .
, Basic, , .
( ). , . , (, , ). . :
X=PI/n+1.2
M1:
Y=SIN(2*X)+SQR (X)
Z=1-2*Y/X
. .
.
.
[LET] V =
(LET ), V - , - .
:
Y=X*SIN (x)^2+2.4
I =3.14159
$ = NAME
N%=51
M=M+1
(I)=1-(2*1-1)^3
LET , , . LET , . ( =+1 ).
. ($=6.28), .
|
|
|
, , , , . ,
%=1.23456789 . % 1.
, , . , =12 12.0.
.
LET . . DT READ.
DATA
,
DATA 5, 7.35, 1-2
DATA . , (, ) ; . ,
DATA 7.2, BASIC, 3. 14159," PROGRM"
DAT . DAT, , , DÀT, .
DAT DATA .
.
READ
READ DAT , . ,
DÀT 5, 7.35, BSIC, 1E-2
DÀT 701.5, 46, 3.14153
READ N%, , X%, B, C, D#
:
N%=5 =7.35: X&=BSIC": =1-2: =70.5: =46: D#=3.14159
, READ , , out of DAT ( ).
, RED, . , , , - . , , , READ , LET.
DAT , , RESTORES. ,
RED , , %
DAT 10.6, 0.1,15
RESTORE:
RED E, F
. =10.6, =0.1, %=15, =10.6,F=0.1
BASIC
INPUT
:
INPUT A, N%, X$
, INPUT, . , INPUT, , . INPUT. ENTER. INPUT
|
|
|
? 7.35; 5,BASIC
O INPUT, ( ) . INPUT , . , :
INPU " ; v
:
?
, .
ENTER, , . INU , ? Redo from start ( ). . INU .
1) . :
DATA 1., , 5, 6E-3
READ X, 2$, Y
C%=SQR (ABS (X-Y))
2) A B, :
READ A
DATA 1.6, 2.3
RESTORE
DATA 5.8
READ B
3) N(3)
OPTION BASE 1
DEFINT K-0
DIM N (3)
DATA 2,3,3
READ N (1), N (2), I
N (i-1)*N (2*i-5)
4) A INPUT X,
? 0.6,-1.
A%=FIX (x*t-x/t)
5) N
DATA country, man READA$, $
$=A$+B$
N%=LEN($)
