. .
DEF FN Sum (x, y) = x + y
CLS
INPUT " 6 "; a, b, c, d, e, f
S = FN Sum(a, b) * FN Sum(c, d) * FN Sum(e, f)
PRINT "S = "; S
END
DEF FN Sum (x, y)
FNSum = x + y
END DEF
CLS
INPUT " 6 "; a, b, c, d, e, f
S = FN Sum(a, b) * FN Sum(c, d) * FN Sum(e, f)
PRINT "S = "; S
END
DECLARE FUNCTION Sum! (x!, y!)
CLS
INPUT " 6 "; a, b, c, d, e, f
S = Sum (a, b) * Sum (c, d) * Sum (e, f)
PRINT "S = "; S
END
FUNCTION Sum (x, y)
Sum = x + y
END FUNCTION
2 * -.
CLS
INPUT " m < 80 "; m
INPUT " n < 6 "; n
FOR i = 1 TO n
PRINT i
GOSUB 10
GOSUB 20
NEXT i
END
10 FOR a = 1 TO m
PRINT "*";
NEXT a
RETURN
20 FOR b = 1 TO m
PRINT "-";
NEXT b
RETURN
1. .. : / .. . 5- ., . .: . ., 2009. 512 .
2. .. : / .. [ .]; . .. . 3- ., . .: , 2007. 768 .
3. : : . / . .. . 2- . .[ .]: , 2006. 640 .
4. : : . / .. [ .]; . .. . 3- ., . .: , 2003. 256 .
1. .. : . / .. , .. , .. . .: . ., 1992. 303 .
2. .. / .. , .. . .: , 1990. 256 .
3. .. / .. , .. , .. . .: , 1988. 368 .
4. .. . .: . ., 1990. 255 .
5. .. / .. . .: , 1987. 240 .
1
.
.
1. .
2. .
2.1. .
2.2. .
2.3. .
.
.
WORD ( Windows).
WORD Times New Roman (Cyr) 14 . - 4. - 1,25 . 2 , 1 . .
|
|
, .
. , . , .
Microsoft Equation :
.................................... 14 ;
........................ 12 ;
.......................... 10 ;
....................... 16 ;
.......................... 8 .
: Times New Roman (Cyr), Symbol.
. !
. .
( 2). .
2
. .
(): 150700
:
. .__________ _________(______________)
_____ _____________20__ .
, ...,
____________(_____________)
_____ _____________ 20__ .
, ...,
_____________(_______________)
_____ _____________20__ .
201__
3
2
x, y. z, .
, .
Rem
Cls
Open Lab_2.txt for output as #1
Print N2
Print #1, N2
Print . 621571 ..
Print #1, . 621571 ..
Print N1
Print #1, N1
Print #1,
Print z=(Abs(x)-y^2)/(Sqr(y)+Log(Abs(x)))+Exp(x+y)
Print #1, z=(Abs(x)-y^2)/(Sqr(y)+Log(Abs(x)))+Exp(x+y)
Input " x, y="; x, y
Print #1, ; x="; x; y="; y
z=(Abs(x)-y^2)/(Sqr(y)+Log(Abs(x)))+Exp(x+y)
Print " "
Print "z=(Abs(x)-y^2)/(Sqr(y)+Log(Abs(x)))+Exp(x+y)="; z
Print #1, " "
Print #1, "z="; z
Close #1
End
|
|
N2
. 621571 ..
N1
z=(Abs(x)-y^2)/(Sqr(y)+Log(Abs(x)))+Exp(x+y)
x= -2 y=5
z=(Abs(x)-y^2)/(Sqr(y)+Log(Abs(x)))+Exp(x+y)=27.93747
4
, .
, () (), ( ) , . ( ) .
19.701-90 , , . (). .
(/ )
()
( ( )
)
, ( )
,
(
)
.