Реферат: Курсовая

ВАРИАНТ

Задание N 5

Cоставить простейшие программы по условиям приведенных ниже задач и записать их на диск.

5.1.Найти площадь сегмента.

где S_сегм —площадь сегмента, см² ;

Возможно вы искали - Реферат: Курсовая работа по информатике

R —радиус круга, см;

a —дуга сегмента, рад.

Исходные данные для расчета приведены в табл.5.1.

Таблица 5.1

Ход программы

Похожий материал - Реферат: Машины, которые говорят и слушают

Program zadacha5_1;

Var r,a,s:real;

Begin

Write('ввудите радиус круга в см. r =');

Readln(r);

Очень интересно - Реферат: Механизм генерации транзактов в модели

Write('введите дугу сегмента в рад а=');

Readln(a);

s:=1/(2*r*r*(a-sin(a)));

Writeln('Площадь сегмента s=',s:17:13);

end.

Вам будет интересно - Реферат: Мониторы

Решение

ввудите радиус круга в см. r =220.0

введите дугу сегмента в рад. a=161.3

Площадь сегмента s=0.00000006370

5.2. Определить свободную длину винта из условия работы на продольный изгиб.

Похожий материал - Реферат: Накопители на жестких дисках

Расчетная формула:

где h_св - свободная длина винта, мм ;

E - модуль упругости для стали, н/мм² ;