.


:

:



,



( , )

:

































 

 

 

 
FAQ

. 1.3. Private Sub CommandButton1_Click() Dim x As Single, y As Single For x = 3 To 4 Step 0.1 y = Cos(x) MsgBox y Next End

⇐ 3456789101112 ⇒



1.3. Private Sub CommandButton1_Click() Dim x As Single, y As Single For x = 3 To 4 Step 0.1 y = Cos(x) MsgBox y Next End Sub 1.4. , ={2;0,1;-4;5,7;-3;11;0,2;8;-6;21}  
Private Sub CommandButton1_Click() Dim a(10) As Single, s As Single Dim i As Integer s = 0 For i = 1 To 10 a(i) = Cells(i, 1) s = s + a(i) Next MsgBox s End Sub  
0.1
-4
5.7
-3
 
0.2
 
-6
 
 

 

, .

 

.. 2

1. . 2

1.1. ..... 2

1.2. ... 2

1.3. 3

1.4. ..... 3

充... 3

 
, 3.1.

 

3.1

Microsoft Equation. . , . . .

, . , . , . . : 2 , 3 , 2 , 1 .

(, , ). , . .

⇐ 3456789101112 ⇒


:

: 2015-10-01; !; : 372 |

:

:

, , 1:10
==> ...

1684 - | 1611 -


© 2015-2024 lektsii.org - -

: 0.01 .