.


:




:

































 

 

 

 


20_2.

3989859

9 209

s, . .

 

s, k s:= 0 k 9 13 s:= s + 9 s DIM k, s AS INTEGER s = 0 FOR = 9 TO 13 s = s + 9 NEXT k PRINT s Vars,k: integer; Begin s:= 0; for k:= 9 to 13 do s:= s + 9; writeln(s); End.

9 490

, . .

 

s, k s:= 2 k 1 5 s:= s*2 s s = 2 FOR k = 1 TO 5 s = s*2 NEXT k PRINT s END Var s, k: integer; Begin s:= 2; for k:= 1 to 5 do s:= s*2; write (s); End.

9 1020

u, . .

 

u,i u:= 30 i 1 6 u:= u i u DIM i,u AS INTEGER u = 30 FOR i = 1 TO 6 u = u i NEXT i PRINT u Varu,i: integer; Begin u:= 30; For i:= 1 to 6 do u:= u i; Writeln(u); End.

9 650

s, . .

 

s, n s:= 5 n 2 4 s:= s + (n-1) s DNM n, s AS INTEGER s = 5 FOR n = 2 TO 4 s = s + (n-1) NEXT n PRINT s Var s, n: integer; Begin s:= 5; For n:= 2 to 4 do s:= s + (n-1); Writeln(s); End.

9 847

s, . .

 

n, s s:= 1 n 2 5 s:= s * 3 s DIM n, s AS INTEGER s = 1 FOR n = 2 TO 5 s = s * 3 NEXT n PRINT s END var n, s: integer; begin s:= 1; for n:= 2 to 5 do s:= s * 3; write(s); end.

9 169

s, . .

 

s, k s:= 0 k 7 11 s:= s + 11 s DIM k, s AS INTEGER s = 0 FOR = 7 TO 11 s = s + 11 NEXT k PRINT s Vars,k: integer; Begin s:= 0; for k:= 7 to 11 do s:= s + 11; writeln(s); End.

9 550

y, . .

 

y, i y:= 0 i 1 3 y:= y + 4*i y DIM i, y AS INTEGER y = 0 FOR i = 1 TO 3 y = y + 4*i NEXT i PRINT y Vary,i: integer; Begin y:= 0; For i:= 1 to 3 do y:= y + 4*i; Writeln(y); End.

9 69

s, . .

 

s, k s:= 0 k 3 8 s:= s + 9 s DIM k, s AS INTEGER s = 0 FOR = 3 TO 8 s = s + 9 NEXT k PRINT s Vars,k: integer; Begin s:= 0; for k:= 3 to 8 do s:= s + 9; writeln(s); End.

9 350

s, . .

 

s, k s:= 50 k 0 8 s:= s - 4 s DIM k, s AS INTEGER s = 50 FOR = 0 TO 8 s = s - 4 NEXT k PRINT s END Vars,k: integer; Begin s:= 50; for k:= 0 to 8 do s:= s - 4; writeln(s); End.

9 370

, . .

 

s, k s:= 50 k 1 9 s:= s - 3 s s = 50 FOR = 1 TO 9 s = s - 3 NEXT k PRINT s END Var s, k: integer; Begin s:= 50; for k:= 1 to 9 do s:= s - 3; write (s); End.

9 710

s, . .

 

s, k s:= 0 k 6 12 s:= s + 10 s DIM k, s AS INTEGER s = 0 FOR = 6 TO 12 s = s + 10 NEXT k PRINT s Vars,k: integer; Begin s:= 0; for k:= 6 to 12 do s:= s + 10; writeln(s); End.

9 1163

s, . .

 

s, k s:= 0 k 14 18 s:= s+7 s DIM k, s AS INTEGER s = 0 FOR k = 14 TO 18 s = s+7 NEXT k PRINT s Vars,k: integer; Begin s:= 0; for k:= 14 to 18 do s:= s+7; writeln(s); End.

9 390

, . .

 

s, k s:= 100 k 1 9 s:= s - 5 s DIM k, s AS INTEGER s = 100 FOR k = 1 TO 9 s = s - 5 NEXT k PRINT s END Var s, k: integer; Begin s:= 100; for k:= 1 to 9 do s:= s - 5; write (s); End.

9 470

, . .

 

s, k s:= 1 k 3 0 −1 s:= s*3 s s = 1 FOR k = 3 TO 0 STEP −1 s = s*3 NEXT k PRINT s END Var s, k: integer; Begin s:= 1; for k:= 3 downto 0 do s:= s*3; write (s); End.

9 410

, . .

 

s, k s:= 3 k 0 9 s:= s + 3 s s = 3 FOR = 0 TO 9 s = s + 3 NEXT k PRINT s END Var s, k: integer; Begin s:= 3; for k:= 0 to 9 do s:= s + 3; write (s); End.

 

20_2.

1. 20 260 20.2 , , 6. , . , 6. 1000. 30 000. , 6.

:

3 16 26 24 2

2. 20 300 20.2 , , 5. , . , 5. 100. 300. , 5.

:

3 15 25 6 40

3. 20 441 20.2 . , . :

1) ;

2) , 30 /.

 

N (1 ≤ N ≤ 30), . 1 300. , , 30 /.

:

4 74 69 63 96 33 0

4. 20 661 20.2 , , 3 4. , , 0 (0 , ). 1000. 30000. : , 3 4.

:

16 24 56 22 54 0 78

5. 20 381 20.2 . , . . 80 /, YES, NO.

N (1 ≤ N ≤ 30), . 1 300. , YES NO.

:

4 74 69 63 96 63 YES

6. 20 1253 20.2 , , 8, , ( NO). , , 0 (0 , ).

100. 300. , 8, NO, . .

:

8 122 64 16 0 29,3
111 1 0 NO

7. 20 1273 20.2 , , 8. , , 0 (0 , ). 1000. 30 000.

: , 8.

:

17 16 32 160 0 48

8. 20 160 20.2 , , 4. , . , 4. 1000. 30 000. , 4.

:

3 14 25 24 38

9. 20 421 20.2 . , . . 40 /, YES, NO.

N (1 ≤ N ≤ 30), . 1 300. , YES NO.

:

4 74 69 63 96 63 NO

10. 20 60 20.2 , , 4. , . , 4. 1000. 30 000. , 4.

:

3 16 26 24 2

 



<== | ==>
 | 8
:


: 2018-10-14; !; : 621 |


:

:

, - , ; , - .
==> ...

1668 - | 1679 -


© 2015-2024 lektsii.org - -

: 0.02 .