1. Найдем длину окружности обруча: C=L-D 2. Из формулы длины окружности C=2πR найдем радиус: R=C/(2π) R=(L-D)/(2π) - это формулу и надо запрограммировать.
<em>// PascalABC.NET 3.3, сборка 1542 от 05.10.2017</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
begin var (L,D):=ReadReal2('Введите длину полосы L и припуск на соединение D:'); Writeln('Радиус обруча будет равен ',(L-D)/(2*Pi):0:3) end.
<u>Пример</u> Введите длину полосы L и припуск на соединение D: 6 0.7 Радиус обруча будет равен 0.844