Определение характеристик кривого бруса

Тип работы:
Контрольная
Предмет:
Программирование


Узнать стоимость

Детальная информация о работе

Выдержка из работы

Введение

При осуществлении проектов в машиностроительной области, начальной стадией реализации этого проекта является создание модели, которая по возможности могла бы учитывать все факторы, влияющие на качество, надежность, долговечность, заданные характеристики работы при эксплуатации. В соответствии с условиями работы и заданными техническими характеристиками необходимо спроектировать такую модель, которая бы отвечала всем поставленным требованиям. Однако в процессе разработки приходится воплощать несколько моделей и сравнивать их характеристики между собой для более оптимального решения проблемы, в этих случаях наиболее целесообразно использовать ЭВМ.

Автоматизация машиностроения требует не только автоматического управления режимами, например, механической обработки, прессования, термической, физико-химической обработки и других рабочих процессов машиностроения. Для полной механизации работ требуется автоматизация транспортирования (перемещения в пространстве) и переориентация объекта производства. В качестве такого объекта манипулирования может быть обрабатываемая деталь, инструмент или другой предмет самой разнообразной конфигурации. Чаще всего требуется не только переместить в пространстве, но и сориентировать деталь определенным образом, т. е. не только изменить ее местонахождение, но и развернуть в пространстве определенным образом. Эти операции выполняются манипуляторами промышленных роботов.

1. Постановка задачи

Вертикальная нагрузка интенсивностью q равномерно распределена по дуге четверти окружности радиуса с (рис. 1).

Определить нормальное усилие, поперечную силу и изгибающий момент. Построить графики зависимостей N(ц), Q(ц), M(ц) в одной системе координат.

Рис. 1 Рис. 2

Исходные данные:

с=0,4 м

q=80

ц=90?

k=15

2. Математическая модель решения задачи

Усилия в поперечном сечении под углом ц к вертикали от элементарной силы dP=q·ds· (рис. 2).

dN=-dP·sinц=-·sinцdб

dQ=dP·cosц=·cosцdб

dM=dPс (sinц-sinб)=2(sinц-sinб) dб

Полные усилия от нагрузки, действующие на отсеченную часть бруса:

3. Алгоритм решения задачи

1. Вводим исходные данные:

p, q1, fi1, k;

2. Для i=1, k+1

2.1. fii=;

3. Для i=1, k+1

3.1. Ni=-·q1·p·sin (fii)·fii;

3.2. Вывод (fii, Ni);

4. Для i=1, k+1

4.1. Qi=q1·p·cos (fii)·fii;

4.2. Вывод (fii, Qi);

5. Для i=1, k+1

5.1. Mi=q1·p·p·(sin (fii)·fii+cos (fii) — cos0);

5.2. Вывод (fii, Mi);

4. Схема алгоритма

/

/

5. Таблица идентификаторов

Наименование

физический смысл

идентификатор

Вертикальная нагрузка

q

q1

Радиус дуги

с

p

Нормальное усилие

N

N

Поперечная сила

Q

Q

Изгибающий момент

M

M

Начальный угол

ц

fi1

6. Текст программы

Program kyrs18;

Uses crt;

TYPE Vect=array [1. 100] of real;

Var i, k: integer; p, fi1, q1: real; fa2: text; fi, n, q, m: vect;

begin

ClrScr;

assign (fa2,'res18. res'); rewrite (fa2);

writeln ('Vvedite isxodnie dannie');

readln (p, q1, fi1, k);

writeln (fa2,' Kyrsovoi proekt');

writeln (fa2,' Opredelenie haraktristik krivogo brysa');

writeln (fa2,' Isxodnie dannie: ');

writeln (fa2,'p=', p: 3:1,' Q=', Q1: 2:0,' fi1=', fi1: 5:2,' k=', k: 2);

writeln (fa2,'Rezultati raboti: ');

for i: =1 to k+1 do

fi[i]: =(i-1)*fi1/k;

writeln (fa2);

writeln (fa2,'3avisimost N (fi)');

writeln (fa2,' fi N');

for i: =1 to k+1 do begin

N[i]: =-1*q1*p*sin (fi[i])*fi[i];

writeln (fa2, fi[i]: 5:2,' ', N[i]: 5:2)

end;

writeln (fa2);

writeln (fa2,'3avisimost Q (fi)');

writeln (fa2,' fi Q');

for i: =1 to k+1 do begin

Q[i]: =q1*p*cos (fi[i])*fi[i];

writeln (fa2, fi[i]: 5:2,' ', Q[i]: 5:2)

end;

writeln (fa2);

writeln (fa2,'3avisimost M (fi)');

writeln (fa2,' fi M');

for i: =1 to k+1 do begin

M[i]: =q1*p*p*(sin (fi[i])*fi[i]+cos (fi[i]) — cos (0));

writeln (fa2, fi[i]: 5:2,' ', M[i]: 5:2)

end;

writeln ('PA6OTA 3ABEPIIIEHA');

close (fa2);

repeat until keypressed;

end.

кривой брус программа алгоритм

7. Результаты работы программы

Kyrsovoi proekt

Opredelenie haraktristik krivogo brysa

Isxodnie dannie:

p=0.4 Q=80 000 fi1= 1. 57 k=15

Rezultati raboti:

3avisimost N (fi)

fi N

0. 00 0. 00

0. 10 -349. 92

0. 21 -1392. 04

0. 31 -3103. 48

0. 42 -5446. 59

0. 52 -8369. 48

0. 63 -11 806. 95

0. 73 -15 681. 51

0. 84 -19 904. 70

0. 94 -24 378. 54

1. 05 -28 997. 18

1. 15 -33 648. 69

1. 26 -38 216. 94

1. 36 -42 583. 59

1. 47 -46 630. 14

1. 57 -50 239. 98

3avisimost Q (fi)

fi Q

0. 00 0. 00

0. 10 3331. 00

0. 21 6552. 43

0. 31 9556. 71

0. 42 12 240. 23

0. 52 14 505. 26

0. 63 16 261. 77

0. 73 17 429. 11

0. 84 17 937. 59

0. 94 17 729. 85

1. 05 16 762. 06

1. 15 15 004. 92

1. 26 12 444. 36

1. 36 9082. 14

1. 47 4936. 07

1. 57 40. 01

3avisimost M (fi)

fi M

0. 00 0. 00

0. 10 69. 92

0. 21 277. 39

0. 31 615. 55

0. 42 1073. 12

0. 52 1634. 62

0. 63 2280. 59

0. 73 2988. 04

0. 84 3730. 79

0. 94 4480. 01

1. 05 5204. 76

8. Графическая часть

9. Анализ результатов

В результате работы программы были определены зависимости нормального усилия, поперечной силы и изгибающего момента от полярной координаты.

Максимальное значение продольной силы N достигается при.

Максимальное значение продольной силы Q достигается при.

Максимальное значение продольной силы M достигается при.

Литература

1. Рапаков Г. Г., РжеуцкаяС.Ю. Тurbo Pascal для студентов и школьников. — СПБ.: БХВ — Петербург, 2004. — 352 с. :ил.

2. Анципорович П. П., Алейникова О. И., Булгак Т. И., Луцко Н. Я. Информатика. Учебно-метод. Пособие к лабораторным работам для студ. машиностроит. спец. В 4 ч. — Мн.: БНТУ, 2009.

ПоказатьСвернуть
Заполнить форму текущей работой