ПРИМЕРЫ ПРОГРАММИРОВАНИЯ НА ЯЭЫКЕ PASCAL ПРОГРАММИРОВАНИЯ НА ЯЗЫКЕ PASCAL 7. (ЦИКЛЫ) - презентация

1 ПРИМЕРЫ ПРОГРАММИРОВАНИЯ НА ЯЭЫКЕ PASCAL ПРОГРАММИРОВАНИЯ НА ЯЗЫКЕ PASCAL 7. (ЦИКЛЫ)

2 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR N,K,S:integer; BEGIN READ(N); K:=1; S:=0; WHILE K

3 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR K,S:integer; BEGIN K:=50; S:=0; WHILE K

4 Цикл с постусловием Program SNW; VAR N, K, S: integer; BEGIN READ(N); K:=2; S:=0; WHILE K

5 Цикл с постусловием Program SNW; VAR K, S: integer; BEGIN K:=6; S:=0; WHILE K

6 Цикл с постусловием Program SNW; VAR K,S:integer; BEGIN K:=10; S:=0; WHILE K

7 Цикл с постусловием Program SNW; VAR N,K,S:integer; BEGIN READ(N); K:=1; S:=0; WHILE K

8 Цикл с постусловием Program SNW; VAR N,K,S:integer; BEGIN READ(N); K:=3; S:=0; WHILE K

9 Цикл с постусловием Program SNW; VAR N,K,S:integer; BEGIN READ(N); K:=5; S:=0; WHILE K

10 Цикл с постусловием Program SNW; VAR N,K,S:integer; BEGIN READ(N); K:=10; S:=0; WHILE K

11 Цикл с постусловием Program SNW; VAR K,S:integer; BEGIN K:=20; S:=0; WHILE K

12 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR N, K, P: integer; BEGIN READ(N); K:=1; P:=1; WHILE K

13 Цикл с предусловием Цикл с постусловием Program SNW; VAR N, K, P: integer; BEGIN READ(N); K:=2; P:=1; WHILE K

14 Цикл с предусловием Цикл с постусловием Program SNW; VAR N, K, P: integer; BEGIN K:=16; P:=1; WHILE K

15 Цикл с предусловием Цикл с постусловием Program SNW; VAR N, K, P: integer; BEGIN READ(N); K:=1; P:=1; WHILE K

16 Цикл с предусловием Цикл с постусловием Program SNW; VAR K, P: integer; BEGIN K:=11; P:=1; WHILE K

17 Цикл с предусловием Цикл с постусловием Program SNW; VAR N, K, P: integer; BEGIN READ(N); K:=3; P:=1; WHILE K

18 Цикл с предусловием Цикл с постусловием Program SNW; VAR K, P: integer; BEGIN K:=12; P:=1; WHILE K

19 Цикл с предусловием Цикл с постусловием Program SNW; VAR N, K, P: integer; BEGIN READ(N); K:=5; P:=1; WHILE K

20 Цикл с предусловием Цикл с постусловием Program SNW; VAR K, P: integer; BEGIN K:=10; P:=1; WHILE K

21 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR N,K:integer; BEGIN READ(N); K:=1; WHILE K

22 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR N,K:integer; BEGIN READ(N); K:=2; WHILE K

23 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR N,K:integer; BEGIN READ(N); K:=1; WHILE K

24 Цикл с постусловием Program SNW; VAR N, K: integer; BEGIN READ(N); K:=3; WHILE K

25 Цикл с постусловием Program SNW; VAR N, K: integer; BEGIN READ(N); K:=5; WHILE K

26 Цикл с постусловием Program SNW; VAR N, K, S: integer; BEGIN READ(N); K:=1; S:=0; WHILE K

27 Цикл с предусловием Цикл с постусловием Цикл с параметром Program SNW; VAR N, K, P: integer; BEGIN READ(N); K:=1; P:=1; WHILE K