Четыре яхты плывут по реке (две навстречу другим двум они встретились в том месте, где речка такая узкая что двум яхтам разминуться невозможно. но в этом месте есть затока, в которую может зайти одна яхта. как разъехаться яхтам?

1)  => =>   < = < =             => 2)=> < =         < = 3)=> < = < = =>           => 4)< = < =     => profit

Есть тут один код на примете {программа свободные колебания кругового маятника}program math_01; {подключение модулей подпрограмм}uses crt, graph; {описание констант}const phi0=30; // начальный угол наклона маятника w0=0; // начальная угловая скорость маятника l=400; // длина нити r=8; // радиус груза light=2; // радиус блика k=0.02; // коэффициент сопротивления m=1; // масса груза xp=320; // координата x точки подвеса yp=10; // координата y точки подвеса g=9.8; // ускорение свободного падения tau=0.4; // шаг по времени{описание переменных}var x, y, xx, yy, w, eps, phi: real; {процедура инициализации графического режима 640x480}procedure opengraph; var driver, mode, errorcode: integer; begin driver: =detect; initgraph(driver, mode, 'c: \bp\bgi'); errorcode: =graphresult; if errorcode < > grok then halt(1); end; {процедура исключения мерцаний изображений}procedure glimmer; begin repeat until port[$3da] and 8 < > 0; end; {процедура вывода изображения маятника на экран}procedure display; begin glimmer; setcolor(black); setfillstyle(solidfill, black); line(xp, yp, round(xx), round(yy)); fillellipse(round(xx), round(yy), r, r); setlinestyle(solidln, 0, normwidth); setcolor(darkgray); line(xp, yp, round(x), round(y)); setlinestyle(solidln, 0, normwidth); setcolor(darkgray); setfillstyle(solidfill, darkgray); fillellipse(round(x), round(y), r, r); setcolor(lightgray); setfillstyle(solidfill, white); fillellipse(round(x)-3, round(y)-3, light, light); end; {основная часть программы}begin opengraph; setfillstyle(solidfill, darkgray); bar(xp-20, yp-5, xp+20, yp-1); phi: =phi0*pi/180; w: =w0; x: =xp+l*sin(phi); y: =yp+l*cos(phi); repeat begin xx: =x; yy: =y; eps: =-k*w/m-g*sin(phi)/l; w: =w+eps*tau; phi: =phi+w*tau; x: =xp+l*sin(phi); y: =yp+l*cos(phi); display; end; until keypressed; closegraph; end.

Достижения в области новых технологий, на которых основывается формирование  информационного общества, во многом изменили характер политических процессов. по  новому начинают осмысливаться понятия политической коммуникации и политического  информационного пространства. существенным трансформациям подвергается вся система  , свидетельством чего стала активно обсуждаемая и постепенно  внедряемая в практику многих стран проблема “электронной-демократии”. без  информационного сопровождения функционирование современных демократических  институтов может быть существенно затруднено, а обеспечение равного доступа к  политическим сетям при определенных условиях может способствовать закреплению  демократических стандартов и их развитию. при этом выясняется, что современные  информационные технологии, по мере расширения их сферы применения в повседневной  жизни общества, потенциальную возможность не только для углубления  демократических процессов, но и тотального контроля за частной жизнью и манипулятивного  воздействия на личность. в условиях существования открытых, легко доступных и легко  наполняемых информационных сетей возникает проблема ограничения информации,  считающейся социально и опасной; проблема электронного распространения  персональных данных, проблема информационного элитаризма, когда лишь часть  населения получает доступ к новым технологиям и информационным ресурсам и в состоянии  реализовать это преимущество; проблема информационного империализма, когда ту же  проблему доступа к информации и ею большие страны используют против малых;   проблема соблюдения авторских прав и прав производителей электронной информации.  особую проблему преставляет вопрос об информационно бедных странах. на втором  всемирном саммите по информационному обществу /тунис, 2005/ обсуждался в качестве  одного из главных вопрос информационного неравенства стран и трансформация понятия  бедных стран в информационно бедных. в информационном обществе  возникают принципиально новые информационные угрозы для личности, общества и  государства. отсюда - важное значение междисциплинарных и, в первую очередь,  социально-политических исследований проблем информационной безопасности,  киберпреступлений, информационного противоборства и информационных войн.  и это - лишь часть принципиально новых социально-политических проблем,  возникающих при определении национальной стратегии информационной политики  государства в контексте происходящих изменений.  таким образом, актуальность исследований информационного общества связана с  необходимостью теоретического осознания и эффективного политического   процессами, возникающими под воздействием информационно-коммуникативных  технологий.в свете становления информационного общества происходят изменения,  которые трансформируют всю социальную структуру, оказывая воздействие на политические,  , культурные и социальные процессы. глубоко изменяется социально- структура общества.