Отчет защищен с оценкой (отлично, хорошо, удовлетворительно)

Задача 16. Протабулировать длину открытого ремня надетого на данную пару шкивов, радиусами и , при изменении значения расстояния между их центрами на [a,b], с шагом . Воспользоваться известной приближенной формулой:

где - заданы.
Блок схема имеет следующий вид:

Рис.31. Блок схема табулирования длины ремня надетого на пару шкивов
Ниже приводится текст программы с результатами расчетов:
Console.WriteLine("Введите радиус большего шкива, R: ");
double R = double.Parse(Console.ReadLine());
Console.WriteLine("Введите радиус меньшего шкива, r: ");
double r = double.Parse(Console.ReadLine());
if (R <= r)
{
Console.WriteLine("Ошибка! Некорректно введены радиусы.");
}
else
{
Console.WriteLine("Введите шаг изменения длины между шкивами");
double _d = double.Parse(Console.ReadLine());
Console.WriteLine("Введите границы, а и b: ");
double a = double.Parse(Console.ReadLine());
double b = double.Parse(Console.ReadLine());
if (a<=0 | b<=0)
{
Console.WriteLine("Ошибка! Длина не может быть отрицательной.");
}
else
{
Console.WriteLine("Следовательно, начальное значение d = {0}", a);
Console.WriteLine();
double l;
do
{
l = (Math.PI * (R + r)) + 2 * a + (Math.Pow((R - r), 2) / a);
a = a + _d;
Console.WriteLine("l = {0}", l);
} while (a <= b);
}
}
Console.ReadKey();
}
Инструкция по работе с кодом программы была написана для запуска в Microsoft Visual Studio.
Для начала компиляции кода программы, необходимо нажать на кнопку Start на панели инструментов Microsoft Visual Studio или кнопку F5 на клавиатуре. В случае, если при компиляции не были обнаружены синтаксические или прочие ошибки, код успешно компилируется и выводится программа в окне консоли (черное окно вывода).
Для того чтобы протабулировать длину открытого ремня надетого на данную пару шкивов, необходимо, ввести: радиусы и , расстояние между центрами шкивов, границы изменения d [a,b], шаг :
"Введите радиус большего шкива, R: "
5 Enter
"Введите радиус меньшего шкива, r: "
2 Enter
"Введите шаг изменения длины между шкивами"
1 Enter
"Введите границы, а и b: "
1 Enter;
10 Enter.
Далее программа производит вычисления и табулирует сообщение с искомой величиной:
"l = 32,9911485751285"
"l = 30,4911485751286"
"l = 30,9911485751286"
"l = 32,2411485751285"
"l = 33,7911485751286"
"l = 35,4911485751285"
"l = 37,2768628608428"
"l = 39,1161485751285"
"l = 40,9911485751285"
"l = 42,8911485751285"
В случае, если радиусы или длина были введены некорректно программа уведомит об этом.



Рис. 32 Результат работы программы по табуляции вычисляемой длинны открытого ремня надетого на данную пару шкивов.