Изобразите в виде графа взаимосвязи между персонажами и различными предметами из сказки про Царевну-Лягушку. Иван Царевич пустил стрелу. Стрела прилетела к лягушке. Иван Царевич нашел лягушку. Лягушка сбросила лягушачью кожу. Лягушка превратилась в Василису Премудрую. Иван Царевич сжег лягушачью кожу. Василиса Премудрая превратилась в лебедя. Лебедь улетела к Кощею Бессмертному. Баба Яга указала дорогу Ивану Царевичу. Иван Царевич нашел Кощея Бессмертного. Иван Царевич победил Кощея Бессмертного

Любой из нас с самого детства знает, что красный сигнал светофора запрещает движение, зелёный сигнал разрешает движение, а жёлтый - предупреждает о смене сигналов.

Но далеко не каждый знает, как работает современный «продвинутый» транспортный светофор.

К красному сигналу добавился жёлтый. Через пару секунд они оба одновременно погаснут, и включится зелёный.

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

Но не торопитесь начинать движение. Сколько бед и трагедий видел автор этих строк, когда соседи по дороге слепо ориентировались на зелёный сигнал. Сначала нужно убедиться, остановились ли те, кому сейчас загорелся красный. Кто-то может просто не успеть остановиться, а кто-то ну очень спешит и готов проскочить перекрёсток, пусть даже, рискуя жизнью (ладно бы только своей, но ведь и чужой тоже).

Сначала решим физическую задачу:

Дано:

v₀;

L;

Найти:

γ;

Решим систему ур-й описывающих движение:

y(t)=v₀Δt·sinγ - ½gΔt²

x(t)=v₀Δtcosγ;

В момент времени Пусть Δt = τ   x(t)=L, тогда y(t)=0 ⇒

τ= L ÷ v₀cosγ (из ур-я x(t))

из ур-я y(t)

L·g ÷ v₀²=sin2γ

γ = ½arcsin (Lg ÷ v₀²) - Это конечная формула

ответ: γ = ½ arcsin(Lg ÷ v₀²);

Теперь код программы (PascalABC.NET):

//Если угол нужен в радианах

Program bullet_rad;

Const
g_grav = 9.8; // гравитационная постоянная g=9,8

Var
L, //Расстояние до цели
v: real; //Начальная скорость снаряда

Begin
readln (L,v); // Читаем расстояние и скорость
writeln (0.5*arcsin((L*g_grav)/sqr(v))); //Выводим ответ
End.

//Если угол нужен в градусах

Program bullet_gr;

Const
g_grav = 9.8; // гравитационная постоянная g=9,8
pi = 3.14; // постоянная п=3,14

Var
L, //Расстояние до цели
v: real; //Начальная скорость снаряда

Begin
readln (L,v); // Читаем расстояние и скорость
writeln ((90/pi)*arcsin((L*g_grav)/sqr(v))); //Выводим ответ
End.