посчитайте решить )заранее спасибо ❤​

Решение представлено во вложениях.

Язык: Pascal

1.

a:=1; b:=1;

1) a = 2 b = 3

2) a = 4 b = 7

3) a = 8 b = 15

4) a = 16 b = 31

5) a = 32 b = 63

6) a = 64 b = 127

7) a = 128 b = 255

8) a = 256 b = 511

: b = 511

2.

a:=256; b:=0;

1) a = 128 b = 1

2) a = 64 b = 2

3) a = 32 b = 3

4) a = 16 b = 4

5) a = 8 b = 5

6) a = 4 b = 6

7) a = 2 b = 7

8) a = 1 b = 8

: b = 8