.


:




:

































 

 

 

 


, . , , , . ( ). True (), , , False (), .

. , . . .

, , (=, <, >, <=, >=, <>), , : - NOT, ( Ȕ) - AND, ( Ȕ) - OR, Ȕ - XOR, - EQV.

, . , .

=
<
>
<=
>=
<>

, , - NOT, AND, OR, XOR .:

AND() , ;

OR() , ;

XOR( ) , ;

NOT( ) , TRUE, FALSE .

.

  NOT x   x AND y   x OR y   x XOR y   EQV y
X Y          
T T F T T F T
T F F F T T F
F T T F T T F
F F T F F F T

:

5 < 10 True, 5 10
5 > 10 False, 5 10
7 <> 3 True, 7 3
X > 45 True, X 45; False
5-1 > 1+2 True, 5-1 (4),
  1+2 (3) , 4 > 3, .. 4 3

 

IF Then Else

 

: LTrue, ( ), Then, , Else. Else ( ) .

:

If < L > Then < .> [ Else < > ]

: If x mod 3=0 Then TextBox4.Text= 3

If x<>0 Then K=K+1: S=S+X

If x > 0Theny=SQR(x) Else y=1

Iflambda< 1Orbeta = 3Thenx=0

 

:

If < L > Then

< >

[ Else

< > ]

End If

IF END IF

 

IF :

 

If < _1> Then

< _1>

[ ElseIf < _2 > Then

< _2>

ElseIf < _3 > Then

< _3>

ElseIf < _ N > Then

< _ N >

Else

< ELSE>]

End If

 

. <_1> , <_1> , END IF, <_2> .. , ELSE, , - , END IF.

:

If x>=a And x<=b Then

TextBox2.Text =x [a,b]

End If

 

If x>xmax Then

Xmax=x

K=K+1

Exit For

End If

 

Select Case

 

Select Case IFThenEnd IF. Case . . , Case. , , Case. , Case Else:

Select Case < >

Case <_1>

<_1>

[ Case <_2>

<_2>

Case <_ N >

<_ N >

Case Else

<_ else > ]

 

End Select

Select:

Case Is >100 ' 100; Case x^2 ' ; Case -10 To 10 ' [-10,10]; Case 0 To 5, 12 To 19, 7, -2.5, Is > Sred

Is , , Is. . OR.

1 ( 1)

Y:



<== | ==>
, , VB A |
:


: 2018-10-15; !; : 183 |


:

:

.
==> ...

981 - | 845 -


© 2015-2024 lektsii.org - -

: 0.02 .