. , , ,

,,,

. 2001-2002 — ,

2

1. .

. , , . , . , . , , . ( ). , . . ( ) ( ).

. , . ( 80 ) . () ().

( ). .

. à

( ) (, ).

( ) . .

頠 à

ß

2. .

. () . , , ( ). . ( , . .), . () (, ). , str (, strA strCTpoKa). ( ) . $ (, $,$). Visual Basic , . : Dim strA,strCTpoKa As String

. . , . : "", "2000", "2*2"

, . +, . , , "", strA, "", "": "" + strA + ""

: ""
Mid , , % , %. Mid "", = Mid ("", 3, 5) "".

3

1. .

(, , .). , (), . , 33 , (26 ), (). . , , . , , , . ( , .). , . , , () (), . , , , , , , ( ) . , . . , , , (), .

2. . .

(Basic), 1964 . : Pascal, . (). , , , , Print (). Input () . ( ) : , , . . (), . .

, -. : , (. 3).

. , , , () (. 4).

. , . .

:

, (. 5);

, , .

, , .

, , . .

, (. 6, ), ,

 

. 4

1. .

, . , : 0, 1, 2 . .

. , . . , .

. ( ) , ,

:

10 0,1,2,3,4,5,6,7,8,9

2 0,1

555. 5 , , , , .

555 . , , 10. 555 : 55510 = 5 102 + 5 101 4- 5 10.

, ( 10), . 2, (0 1). 2 , 0 1. , 101 : 122+021+120.

2. -

- . () . : , .

. . , . . , . 25 , (1975 .), 8 64 . . . . , . . , . :

N = 21, I .

16 , N = 2 ==65 536.

32 , = 232 = 4 294 967 296.

. , . , , .


5

1. .

. ( ) . , .

. , . . . , .

. , , . , . , .

, , , , , .

( ), - ( ).

, . . () . , . . .

, .

. . (- ). (), .

, : , , . .

 

2. (-., , , .)

. , , , . . (, ), 1 . 500 , 4 ( 8086, 1978 .) 2 ( Pentium 4, 2001 .).

, , . , . 20 8 . (1985 .) , 8 , Pentium 4 64 .

() . , . 1 .

. , 4 , , 64 .

(SIMM, DIMM) ( 1 256 ). : SIMM 30 72 , DIMM 168 .

() . : (1,44 ), ( 50 ), CD-ROM (650 ) DVD ( 10 ). (0,05 /), ( 100 /).

. , , () () . , .

6

1. . (, , .).

. . . . . ( ) ( ). . , , . (, . .). , .

. , , . , , . .

(, , ), . , . . , , , .

, . . , .

. , , . .

,

1 = 23 = 8 .

:

1 = 210 = 1024 ;

1 = 210 = 1024 ;

1 = 210 = 1024 .

2. . , ( , .)

(, , - . .). , / , , (, ).

( ) ( }, , , .

. . . , . , ( ) .

, .

. , , . 50 .

, .

. . CD (CD Compact Disk, ) DVD (DVD Digital Video Disk, ) ( ), . , 0 1.

(), .

: , , (. 2).

 (/c)

Ġ 1,44 ᠠ 0,05 .

Ġ 50ᠠ 100

CD-ROM 650ᠠ 7,8

DVD-ROM 17ᠠ 6,8 |

1

1. , , .

I XX . , , , . (, , ) , .

. , , .

, , , . , |

( ) (, , , , ). , ( ). - ( ), . .

, , , , .

, , , .

2. - . : .

-

. - Visual Basic, Visual Basic for Application (VBA), Delphi .

. - , , , (), ().

, , , . . .

Windows&Office word , :

Documents ( )

, . , .doc
Documents (".doc)

. . , Word : (Aplication), (Documents), (Selection), (Character) .

. , .

, .doc Word :

Application. Documents (". doc")

. - , . , . , .

:

. 1:=, 2:=

, Word ripo6a.doc Open, ( FileName ):

Documents () . Open FileName: =": \\. doc"

. , . . :

. =

Characters (). :

Characters (1), Characters (2) . . ( Selection) ( Characters (1)) ( Bold).

Bold ( True) ( False). True False .


7

. : , , , . , .

( , ), .

. , , , .

, , , , , .

. . ( ) ( ).

, . , ( ), .

𠠠 .

. ࠠ . ..

ࠠ 䠠

cd-rom

𠠠 dvd-rom

, , .

{).

. , , , .

, , ().

. () . .

. {), () (CD-ROM DVD-BOM).

. (. 8).

. . . .

2. . , .

. ,

, ( ):

1) + ;

2) ;

3) + ;

4) .

.

, . . . , .

, . . . .

:

1 15

7


. , -. - (. 9) , () .

8

1. .

. , , . , , , (). , . - , . , , .

. , .

. , .

( , . .) . :

.

- (Basic, Pascal, .). (Visual Basic, Borland Delphi .), . , , , - , , . , : , , , -. . - .

. , (), , . . , , - . . - (, . .) , .

, : , , . .

2. ( )

. - ( , Visual Basic) . .

, , . ( , , . .). , . (Byte, Integer, Long, Single, Double) . (Boolean) True False. (String) . . , , . , , , . .

(). , 0 255 Byte ( ), Double ( ), String . () . ( , . .), . (). 255. , , .

( ') . , Integer %, String $. : Let =

Let . , (, ).

, intA = 3 intB = 4 intC = intA"2 + intB"2

intC , 25.

. , . , , ( ).

: , . .

. . , . . , .

, strA (I i, , :

I 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 33

A(I) υ

( 1 33). , , strA(5).

. , s t (5) .

19

1. .

, , , . , , (, , . .).

, (, , , .), . Word Microsoft Office.

. Adobe PageMaker.

, , , . , .

- (OLE Object Linking Embedding). . , Word, , , -.

, . : (), , .

. . , () . {Enter} .

( ), ( ) ( ), .

. , , , , , @, *, &. ( ), , .

, , , , . . , Times New Roman, Anal, Courier .

. , . .

. TrueType.

. (1 = 0,376 ). Word Times New Roman 12 .

. () , .

. () ( ), (DOC, RTF) , .

2. .

60- , . ( ) - . ...

! 1 , ..1=1=8.

, , : N = 21 =28 - 256.

. , , , ..

0 255 00000000 11111111. , , .

, . ( ). , .

, . . . ' , , . 33 ( 0 32) , ( , ..).

33 127 , , .

128 255 , . - . , (-8, 1251, 866, , ISO), , , .

. .

Unicode, , , 256 , - 218 = 65 536


20

1. 頠 . 蠠

, . - : .

. . , Paint, , Adobe Photoshop CorelPhoto-Paint.

(), . . , . ( ) , .

( ). , , . , .
.

, , .. CorelDRAW Adobe Illustrator.

(, , . .), (X, ), (XI, 1) (2, 2), (X, ) (), (XI, 1) (2, 2) . . .

: , , , , . . . : , , , , . . .

: , . . , , , . , , .

.

. , .

, . .

.

2. .

( ) .

, (), , .

() ,&. < F, :

F=A&B.

, , (1) ().

F (1) (0).

A B F=A&B

0 0 0

0 1 0

1 0 0

1 1 1

, - . , , 22=4 =10. (-1), (-0); , (F == ), . . .

21

1. 堠 .

, .

. (A, G, . .), (1, 16, 278 . .). .

. , : 1, F123, 7. , - , .

. : , .

Excel , : 195,2 1.952 +02. . . ( ) ( , . .).

Excel , , , <32 . . ( ).

, , (, . , . .) . , =1+2 , 1 2,- <=1*5 , .41, 5. , . , , .

. . : . ' .

| , , . . : 1, .

| . -| f . (, $$1).

(: $A), , . -| (, $1), , , , . . ; .

, , 1 .$1+$1, D2 =$1+$2. g , . . . . . . , . . , .

. (, , . .) (200, 10 . .). , 100. , , .

. . (, . .); .

2. : IP-

IP-. , . , , 32- ( ) IP-.

, IP- 4 :

N - 232 - 4 294 967 296.

IP- , , 255. , IP- - 195.34.32.11.

. IP-, , (DNS Domain Name System). IP- .

: . : ( ) ().

ru. su (). , , , . . .

, Microsoft www.microsoft.com, - dialup.mtu.ru

22

1. .

, , .

..

: , .

. , . . . .

; , .

; . , .

, , , . .

. , . , . .

, . ( ) ( ), , - , - . , , .

Windows, , .

. . , , . . . , .

-. .

().

, ().

, () , () , . , Access, Microsoft Office, , .

2. : ,

, -" , .

. , . , . .

.

, , ,

. () . (. . ) .

, , .

. . .

. , Word Excel. (), .

. ; Word Excel ( ) . , , .

. . , , . , .

* . (), . , , .

, , .

. , .

(, AntiVira) Toolkit Pro). ( ) .

. (, AVP Monitor).

, - , , , ,


23

1. (). .

. , .

( ), .

, , , .

, : _@_

_ ; _ , . , - mtu-net.ru. : user_name@intu-net.ru

, . , .

, ' .

. (news), - . , .

. , . . , .

. , .

. . , , : freeware shareware.

. () , . .

( ).

, , .

. , Web-, .

World Wide Web, WWW Web. , , . , , . . -. (, ) , .

, - . () :

Web- ;

(URL) Web-;

Web-.

2. .

, .

, . : .

( ), . , , (, ). , .

, N : N = 2'.

, . , 8 , , () : N - 28 - 256.

, , , /. , - 4^ 16 (16 ), : 16 = 21..

, I=4 , . . , , 4 .

24

1. , , . . -. (, ) , .

WWW ( ), , , , , , .

, WWW-, Web-, , WWW, Web-.

: . . .

1 UBL- , . (URL Universal Resource Locator) , , , ().

. Web- HTTP (Hyper Text Transfer Protocol). , Web- :

http://schools.keldysh.ru/info2000flndex.htm

: http:// ; schools.kefdysh.ru ; /inf62000/index.htm Web-. , , .

2. - . :

- (. Visual Basic) .

. .

(Forms), , . (CommandButton), , (Checkbox), , - (OptionsButton), (LtstBox), (TextBox) .

. ^ - . , , . . , , . .

, - ( ),

( ).

.

()

, Sub End:

Sub _() End Sub

, .

Commandl:

Command! Click()

Chr, , . , Chr (221) .

Formi Print:

Forml. Print srcA :

Sub Commandl Click() srcA - Chr(221) Forml.Print srcA End Sub

Visual Basic . , , .

25

1. .

. , XIX . . : (), () . .

- (), , 1946 . () 1950 . (). ( ), ( ), , . , , .. , , , .

( ) 70- Apple II ( Apple). 80- IBM ( IBM Personal ComputerIBM PC).

. . 80- , 90- . , . . , , .

. XX . . , .

: , , , .

, . , .

.

80- . 1981 . 213 , 80- 150 , 90- , 100 .

, 90- , ( ), 25%, 10 15%.

~ ; , , .

2. .

. , , .

. , (, , 815 ) .

, . . , (, , ) . .

, . , -. , - .

, , ( ). ( ) .

. , , , . , (, , ).

. , (, , .), , . , ( Microsoft, MSN).

. . , , ( , . .) .

, , .

; , , ( ). : , , .

, , , ( 2001 .).

.


16

1. . .

, . .

:

, ;

, , , .

:

, -;

, Visual Basic VBA, , .

. , , ( ) For. . . Next (. 19).

For... Next :

, For, , Next ; , .

. . , .

. , , , . . Do. . . Loop.

, ,

While Until. . While , , . . . . , .

Until , , . . . . , .

2.

. (. 6).

, . , .

. :

0+0=0 110

0+1=1 + 11

1+0=1 1001

1+1=10

. (. 7). (0) (I) . 1 .

.

. (. 8).

, , . 110, :

110

* 11___

110

110____

10010

17

1. , . - . , : , .

Visual Basic , , . : .

, . . Sub (subroutine ) End Sub.

. (), (Formi) , .

() (). , Forml,

CTeHa_Click___Ciick.

Private Sub _click()

Forml.Line (20, l00)-(220, 200),

End Sub

private Sub Kpbiuia_Click()

Forml.Line (20, 100)-(220, 100): Forml.Line (20, 100)-(120, 50): Forml.Line (120, 50)-(220, 100) End Sub

Form1 . .

. , . , , . , (), .

- , Call. .

, .

, .

, .

Call 1() SZ

, (Form2). (1, 2, Yl, Y2 As Single), . ( ). .

Click () , . . .

(Form2) (XI, 2, Yl, Y2 As Single) Click ():

Private Sub (1, 2, Yl, Y2 As Single)

Form2.Line (XI, Y1)-(X2, Y2),

Form2.Line (XI, Y1)-(X2, Yl)'

Form2.Line (X.I, Y1)-((X1 + 2) / 2, Y1:V 2)

Form2.Line ((XI + 2) / 2, Yl / 2)-<X2, YD

End Sub

Private Sub _111^()

Call .<10, .50, 50,. J.00) , . ., /

Call (60, 150, 150, 200)

Call (160, 300, 80, 200)

End Sub

Form2 . . _Click(), .

2. . (, , )

. , .

. , , , . .

.

. , . , .

, , ' . , , , . . .

, () . , . , (, , , , , ), . .

22 , . , ( ). : , , , , , , , .

. , .

18

1. (, . .)

, ( ). ().

, , , If (). Then (). Else () . () , . , :

If A>B Then X=A+B Else X=A*B

, , , , .

: If-Then-Else, For-Next . . , , , .

, , , . , , , :

SQR(A*A+B*B).

, ( , ) . :

""+11 (""^ 3, 5) +strA.

, , , , (>, <, =, >, <= . .).

: . : 5 > 3 ; 2 2 = 5 .

, : And, Or Mot.

: , . , , . ( , , ). : (%=5), (=3.14), ($="'1), (A=True).

, . , , , . : , , vn. ,.

- , . - ,\ , (), ().

- . , , . . , , . .

- , . , .

2. (HTML)

Web- HTML (Hyper Text Markup Language). HTML , () Web-. Web- , .

, . , .

Web- , . Windows -- .

HTML- <HTML></HTML>. . Web- : .

Web- <headx/head> , , .

Web- <title></title> -. Web- :

<HEAD>

<1L></11,>

</HEAD>

<BODY></BODY>, , , , , . . :

<BODY>

</BODY>

HTML- . . <1> ( ) <6> ( ).

. ( ). ALIGN :

<1 ALIGN="center">

Web- GIF, JPG PNG. <IHG> src="kmh ":

<IMG SRC="computer.gif">

. , , .

<IMG> ALT, :

<IMG SRC="computer.gif" ALT="KOMnbioTep"> HTML- Web-:

<HTML>

<HEAD?

<1</1>

</HEAD>

<BODY>

<CENTER>

<H1XFONT ="1"> -

<//1>

</CENTER>

<HR>

<IMG SRC="coniputeE.gif11 ="">

</>

</HTML>

9

1. ( , ). .

. () . ( ), () .

, : , (, . .). , .

. MS-DOS , , :

proba.txt

Windows 255 , , :

.doc

. (, ) . .

( ) - , ( ) .

, , .

, , 1- , , 2- . . , .

. : ( ); ( ); ( ); ( ).

. MS-DOS, , Windows . Windows MS-DOS.

. MS-DOS , (), ().

2. .

( ) .

, (), , .

() v, +:

F=AvB.

, , (1) (0).

F : (1) (0). , , (. 3).

A B F=AvB

0 0 0

0 1 1

1 0 1

1 1 1

, . ;

, , 2 2 = 4 3 3 = 10. ( = 1), ( = 0); , (F = 1), . .

.

10

1. , 20 1992 . ( ), . - . . , , , :

;

() ;

.

, .

. . . , CD-ROM , . , . . , , . , . . . , . , : , ( ), . . : Web-, . . , , , . Web- , , , . . , ( ) . (-), . (firewall). .

2. (, )

(, , ), , , .

. , , B(0,1,0,1) A(0,0,1,1) = F(0,0,0,1)

. , ' , A(0,0,1,1) B(0,1,0,1) = F(0,1,1,1)

. , , (. 13). (0,1) = F(1,0)

. . , .

, . (, ), () (S). (. 4). : 񠠠

= 0,0,1,1 =0,0,0,1 S=0,1,1,0

= 0,1,0,1

, : =& . : S = (A v )&( (&))

11

1. :

. . . . : 1) , ; 2) , : ; . , . . - . , . (V0), () (g 9,8 /2) (V) () (t) . :

V=Vo-g*t, Y=H+V*t gt^2/2

, . . . :

;

( , ..). , Visual Basic. , . ( = + V t - ((g t2 )/2)) (V=Vo-g*t) . , . , , , . . . , , . , : .

2. . , . , , , . .

, , . . , , . . ; . , , , , , . . , . , ( ) . , . : () (). , . : (-'), (), () . , , , , , . . : (), (), (), - (), . . (), () . .


12

1. . . , , , :

;

.

(, .). .

. , , . ; (, ) , .

. , , . , , . ( ) . ( ) , . , (, ) . . .

2. - : , , , , .

- , . . , . (, . .).

: , , , .; , , . .

, . . , , () CD-ROM, . . , : , , , , .

Web-, , , .

13

1. , . . , , , ( ) ( ). . , (, , . .). , , , . . . . , . . , , . , (, .), (, ) ( ). , , . , , , , ;. , . . . , , ; , , , , . . , , . , , . .

2. . , , , . . . .

, InputBox. , strA(l) ( ) Visual Basic:

Dim strA(l To 33) As String I As Byte

Sub Conraandl_Click()

For I = 1 To 33

strA(I) = InputBox (" ", "_

")

next I

End Sub

Command! .

. bytA (I) 1 100, Rnd Int :

Dim bytA(l To 100), I As Byte

Sub Conimandl_CUck ()

For I = 1 To 1.00

bytA(I) = Int(Rnd * 100)

next I

End Sub

, . , , . . . N . .

Dim strAll To 33) As String I,N As Byte

Sub Commandl_Click() '

For I = 1 33

strA(I) = InputBox (" ", __ " ")

Next I

'

strB = InputBox (" ", "")

For I = 1 33

If strB = strA(I) Then N = I

Next I

Formi.Print " "; strB; N

End Sub

14.

1. , , , . -, ( ). , , . -, ( ), (). . , . -, , . , , . : , , . . . , . ( ). , . ( ). . , . algorithmi IX . -, . . , , , , .

2. . . , . , . , , - (, , ), . . . (, , , , .). , . .

, Windows, , . , . , . (, , - . .), ( . .), . . . , . , ( , ). , , . (, ), , . . , Non system disk ,. . .

 


15

1. , , , () , , . , , . . , , (, , . .). :

5>3 ,str A =

, . : 5>3 And str="".

:

, -;

      , Visual Basic VBA

It , Then ( 1), , . Bise ( 2), , . . If. . . Then. . . Else. . . End If (... To... ... ). Then , , ( 1) . Else , ( 2) . End If . If... Then... Else (... ... ). , . . , . , . Else . ( .) , , .

2. . . (, . .), ( , . .), ( , , ) . . , , ; (), ( ). , . . , , . ASCII ( ), . (, , . .). , () (). , , , , : N = 21, N , I . ( ): , ., , , :

32 = 21, . . I = 5 .

, ( , ) 1 , 2 .

^ , , , , .

2 1. . .

 

 

 

! , , , .
. , :