.


:




:

































 

 

 

 





:= 100, b:=0 := - b * 3 if > b then := b else := b ;

2.2. , , :

var n, s: integer; begin n:= 14; s:= 0; while n <= 18 do begin s:= s + 25; n:= n + 1; end; write(s); end.

2.3. , > 4000. , .

 
     
     
     
     
     
     
     

 

  D
       
       
       
D        

 

2.4. . , . , 5. .

  D
       
       
       
D        


1) 2) 3) 4)

 

2.5. , , , , , , , , , , , . , . ?

11 1

2

1.1. ?

) -

) - ,

) -

) - ,

 

, ,

)

)

)

)

 

1.3. . 5 :

)

)

)

)

)

1.4. , Var word?

) -32767 ) 0 ) 6,5535 ) 65535

 

1.5. : X>Y>Z, A=X+Y+Z :

) If not(X<Y<Z) then A:=X+Y+Z

) If X>Y>Z then A:=X+Y+Z

) IF (X>Y) or (Y>Z) then A:=X+Y+Z

) IF (X>Y) and (Y>Z) then A:=X+Y+Z

1.6. , ?

) ) ) )

 

1.7. MEMO?

) ) ) )

 





:


: 2016-10-27; !; : 1833 |


:

:

.
==> ...

1777 - | 1715 -


© 2015-2024 lektsii.org - -

: 0.013 .