Решите табличным жили три молодых человека - андрей, бронислав и борис. один из них - аптекарь, другой - бухгалтер, третий - агроном. один живет в бобруйске, другой - в архангельске, третий - в белгороде. требуется выяснить, кто где живет и у кого какая профессия. известно лишь, что: 1) борис бывает в бобруйске лишь и то весьма редко, хотя все его родственники живут в этом городе. 2) у двоих из этих людей названия профессий и городов, в которых они живут, начинаются с той же буквы, что и имена. 3) жена аптекаря приходится борису младшей сестрой. жили три молодых человека - андрей, бронислав и борис. один из них - аптекарь, другой - бухгалтер, третий - агроном. один живет в бобруйске, другой - в архангельске, третий - в белгороде. требуется выяснить, кто где живет и у кого какая профессия. известно лишь, что: 1) борис бывает в бобруйске лишь и то весьма редко, хотя все его родственники живут в этом городе. 2) у двоих из этих людей названия профессий и городов, в которых они живут, начинаются с той же буквы, что и имена. 3) жена аптекаря приходится борису младшей сестрой.

Из данных фактов получим то, что Борис не Аптекарь и не живёт в Бобруйске, а аптекарь там живёт.

значит Андрей из Архангельска и агроном.

а Борис- Белгород и работает бухгалтером.

1) V=x*y*G
G - глубина изображения 
C - количество цветов
c=2^G => g=6
V=(2^7 * 2^8 * 6)/2^13 = 24
ответ 24
(2^13 т.к. в килобайтах)

2) V=(2^7 * 2^7 * 5)/2^13=10
ответ: 10

3) V=(2^6 * 2^7*7)/2^13=7 
ответ: 7

4) V=(2^6 * 2^8 * 8)/2^13=16
ответ: 16

5) V=(2^5 * 2^10 * 7)/2^13=28
ответ: 28

6) V=(2^9 * 2^10 * 6)/2^13=384
ответ: 384

7) V=(2^9 * 2^8 * 5)/2^13=80
ответ: 80

8) V=(2^7*2^9*4)/2^13=32
ответ: 32

9) V=(2^7 * 2^8 * 3)/2^13=12
ответ: 12

10) V=(2^7 * 2^7 * 8)/2^13=16
ответ: 16

11) V=x*y*G; G=V/(x*y)
V=24*2^13
x*y=2^7*2^8 => G=(24*2^13)/(2^15)=8
т.к. c=2^G => c=2^8=256 цветов.
ответ: 256

12) G=(10*2^13)/(2^14)=5
c=2^5=32 цвета 
ответ: 32

13) G=(7*2^13)/(2^13)=7
c=2^7=128 цветов
ответ: 128

14) G=(16*2^13)/(2^14)=8
c=2^8=256 цветов
ответ: 256

15) G=(28*2^13)/(2^15)=7
c=2^7=128
ответ: 128

ответ:

uses graphabc;

var xx,yy,u: integer;

procedure growl(x,y,r: integer);

var i: byte;

begin

for i: =1 to r do

    begin

    circle(x,y,i);

    sleep(5);

    end;

end;

procedure growr(x,y: integer);

var i: byte;

begin

for i: =1 to 20 do

    begin

    ellipse(x-5,y-(i),x-(i*3),y+(i));

    ellipse(x+5,y-(i),x+(i*3),y+(i));

    ellipse(x-(i),y-5,x+(i),y-(i*3));

    ellipse(x-(i),y+5,x+(i),y+(i*3));

    sleep(3);

    end;

end;

procedure fall;

var r,prer,i: byte;

    x,y: integer;

begin

for i: =1 to 10 do

    begin

x: =random(160)-80+windowwidth div 2;

prer: =0;

r: =random(10)+10;

for y: =80+windowheight div 2 to windowheight+30 do

    begin

    setpencolor(clwhite);

    circle(x,y-1,prer);

    setpencolor(clblack);

    circle(x,y,r);

    prer: =r;

    sleep(3);

    end;

    end;

end;

procedure growd (x,y: integer);

var i: byte;

begin

for i: =20 downto 5 do

    begin

    clearwindow;

    setbrushcolor(clgreen);

    ellipse(x-5,y-(20),x-(60),y+(20));

    ellipse(x+5,y-(20),x+(60),y+(20));

    ellipse(x-(20),y-5,x+(20),y-(60));

    ellipse(x-(20),y+5,x+(20),y+(60));

    setbrushcolor(rgb(255,255-((20-i)*10),255-((20-i)*;

    circle(x-i,y-i,i);

    circle(x+i,y-i,i);

    circle(x+i,y+i,i);

    circle(x-i,y+i,i);

    sleep(5);

    end;

end;

var j: integer;

begin

repeat

setbrushcolor(clgreen);

growr(windowwidth div 2,windowheight div 2);

setbrushcolor(clwhite);

for j: =1 to 360 do

    if j mod 10=0 then

    begin

        xx: =round(windowwidth div 2+20*cos(pi*(u+(j*10))/180));

        yy: =round(windowheight div 2+20*sin(pi*(u+(j*10))/180));

    growl(xx,-j) div 10));

    end;

sleep(100);

fall;

growd (windowwidth div 2,windowheight div 2);

sleep(100);

until false;

end.

объяснение: