Знаходження опорних реакцій та зусиль в стержнях ферми при змінному значенні кута a

При зміні напряму лінії дії сили значення опорних реакцій та зусиль в стержнях ферми змінюється. Їх конкретні значення визначимо за допомогою ЕОМ, склавши при цьому програму, наприклад, на мові BASIC. Алгоритм для програми є формули (4.3), (4.5) – (4.17). Значення кута a змінюємо в межах від 0 до 360° з кроком 30°.

Наведемо текст програми, де порядковими номерами 10 – 710 позначені оператори та пояснення до кожного оператора.

10 -30 – коментарі, які друкуються ЕОМ, але не обробляються;

40-120 –задаються значення постійних сил та розмірів;

130-160 – записані формули (4.1), за допомогою яких знаходяться функції кутів b і g;

180 – початок циклу, де вказується, що кут a (позначено U) змінюється від 0 до 360° з кроком 30°;

190-200 – відповідно записані значення sina і cosa в радіанній мірі;

210-590 – записані формули, якими визначаються опорні реакції та зусилля в стержнях;

280 – перевірочний момент (S М_С(F)).

600-650 – оператори виведення результатів до друку;

700 – закінчення циклу, відкритого оператором 180;

710 – кінець програми.

Після віддрукованої програми знаходиться фрагмент результатів розрахунків.

10 REM РОЗРАХУНОК ПЛОСКОЇ ФЕРМИ

20 REM ЗРАЗКОВИЙ ПРИКАД ПРОГРАМИ

30 REM ВИКОНАВ СТ. ГР. 1Б-00 ІВАНОВ І. І.

40 P1=3

50 P2=5

60 P3=6

70 A1=3

80 A2=3

90 B1=3

100 B2=3

110 H1=3

120 H2=6

130 S=(A1+B1)/SQR((a1+B1)^2+H2^2)

140 C=SQR(1-S^2)

150 SN=H1/SQR(A1^2+H1^2)

160 CC=SQR(1-SN^2)

170 LPRINT TAB(20) “________РЕЗУЛЬТАТИ РОЗРАХУНКІВ____”

180 FOR U=30 TO 360 STEP 30

190 U1=SIN(U*PI/180)

200 U2=COS(U*PI/180)

210 R1=P1*H1+P3*U1*(A1+B1+B2+A2)

220 R2=P3*U2*H1+P2*(A1+B1+B2)

230 RB=(R1+R2)/((A1+B1)*C)

240 YA=P2+P3*U1-RB*C

250 XA=-RB*S-P1-P3*U2

260 M1=P2*A2-YA*(A1+B1+B2+A2)+XA*H1

270 M2=-RB*C*(B2+A2)+RB*S*H1

280 MC=M1+M2

290 S1=-YA/SN

300 S8=-XA-S1*CC

400 S7=S8

500 S9=0

510 SD=-S1-S9/SN

520 S2=(S1-SD)*CC-P1

530 S0=-RB*C-SD*SN

540 S6=S7+SD*CC-RB*S

550 SW=-S0/SN

560 S3=S2-SW*CC

570 S5=SW+S6/CC

580 TS=-(S5+SW)*SN

590 S4=P3*U2-S5*CC

600 PRINT TAB(6) “___________U=”U”___________________________”

610 PRINT TAB(6) “XA=”; XA; TAB (17) “YA=”; YA;TAB(28)”RB=”;RB;TAB(40)”MC=”;MC

620 PRINT TAB(6)”S1=”;S1;TAB(17);”S2=”;

S2;TAB(28)”S3=”;S3;TAB(40)”S4=”;S4

630 PRINT TAB(6)”S5=”;S5;TAB(17);

”S5=”;S5;TAB(28)”S7=”;S7;TAB(40)”S8=”;S8

640 PRINT TAB(6)”S9=”;S9;TAB(17);”SD=”;

SD;TAB(28)”SO=”;SO;TAB(40)”SW=”;SW

645 PRINT TAB(6)”TS=”;TS

650 PRINT

700 NEXT U

710 END

___________РЕЗУЛЬТАТИ РОЗРАХУНКІВ __________

______________________________________U=30_______________________________________

XA=-25.79422 YA=-9.598076 RB= 24.88743 MC=-3.814697E-06

S1=13.57373 S2= 16.19616 S3= 8.196156 S4= 8.196156

S5=-4.242644 S6=-11 S7= 16.19615 S8= 16.19615

S9= 0 SD=-13.57373 SO=-8 SW= 11.31371

TS=-4.999998

______________________________________U=120_______________________________________

XA=-17.89 YA=-7.70 RB= 25,30

S1=10.88 S2= 12.39 S3= 2.20 S4= 2.20

S5=-7.35 S6=-15.39 S7= 10.20 S8= 10.20

_________________________________U=360 _________________________________________

XA=-21 YA=-7.000001 RB= 16.97056 MC= 3.814697E-06

S1= 9.899497 S2= 11 S3= 6.000003 S4= 6.000002

S9= 0 SD=-9.899497 SO=-5 SW= 7.071069

TB=-4.999999

Дата добавления: 2015-06-04