Осталось выяснить, сколько у ветра направлений. Если их 8 - стороны света + половинки меж ними - то на один отсчёт ветра нужны три бита информации, 2^3 = 8
И 160 измерений займут
160*3 = 480 бит
Умножь 7 на 33(Столько букв в русском языке) = 231
Uses crt,graphABC;
var
x,y: integer;
procedure Go(n,m: integer);
begin
clearwindow;
setpenwidth(4);
setbrushcolor(clyellow);
rectangle(150,150,550,350);
setpenwidth(2);
setbrushcolor(clgreen);
rectangle(x-50,y-50,x+50,y+50);
x:=x+n;
y:=y+m;
sleep(1);
redraw;
end;
beginlockdrawing;
setwindowsize(700,500);
hidecursor;
repeat x:=150;
y:=150;
while x<=550 do Go (1,0);
while y<=350 do Go (0,1);
while x>=150 do Go (-1,0);
while y>=150 do Go (0,-1);
until keypressed;
<span>end.
Так сойдет? :)</span>
Ясно, что между кинотеатром и булочной находятся аптека и универсам. Из фразы "<span>второй дом после универсама- это ..." следует, что существуют два дома после универсама.</span> А это означает, что универсам второй по порядку. Тогда аптека - третья.
<span>следующий дом после кинотеатра- это <em>универсам</em>
второй дом после универсама- это <em>аптека</em>
второй дом после кинотеатра- это <em>аптека</em>
кинотеатр называется "<em>Сказка</em>"
следующий дом после <em>универсама</em>- это аптека.
предыдущий дом перед аптекой - это <em>универсам</em>
предыдущий дом перед <em>аптекой</em>- это универсам.</span>
19456 байт =19 килобайт, 1кбайт=1024байт, т.е нужно 19456 разделить на 1024, 19456/1024=19
