.


:




:

































 

 

 

 


4




:

1

. , .

 

2

, . .

 

3

N . , .

 

4

N . . , .

 

5

N . , .

 

6

N . , Z, . .

 

7

, N. , , .

8

, N. .

9

N . , i ≤ i, i .

10

N . , L (0 ≤ L ≤ M-1).

11

, , , .

12

, , . A[n] , . , .

13

, . .

14

: , . : .

15

N. , (1, 2, 4, 8, 16, ).

16

N . , [c, d].

 

17

. , . , .

 

18

N . , .

19

N , . P1 P2. P2 P1 , .

20

N. : , .

21

, [, D].

22

, [, D].

23

, .

24

.

25

Y N. , , .

26

, .

27

.

28

.

29

. , , .

30

. B .


. n .

 

. 1.- .

 

4.1

 

 
 

 

 


 

2. .

 

var b:array [1..20] of integer;

i,n,S,P:integer;

begin

write(' n=');

readln(n);

for i:=1 to n do

begin

write(' b[',i,']=');readln(b[i]);

end;

S:=0;

P:=1;

for i:=1 to n do

if b[i]>0 then P:=P*b[i]

else S:=S+b[i];

writeln( b');

for i:=1 to n do

write(b[i]:5);

writeln;

writeln(' S=',s,' P=',P);

readln;

end.

 

3. .

 

b

0 -6 -2 67 4 2

S=-8 P=536

 






:


: 2016-11-12; !; : 1319 |


:

:

: , .
==> ...

772 - | 733 -


© 2015-2024 lektsii.org - -

: 0.013 .