Руководство к решению задач по механике твердого деформируемого тела матричными методами. Бундаев В.В. - 21 стр.

UptoLike

ВУЗ: 

ВСГУТУ | Улан-Удэ

Составители: 

Рубрика: 

41
1.2.2 Блок-схема алгоритма расчета статически
определимых ферм (рис.1.8)
Обнуление векторов
проекций стержней
;,,1, neliП
i
Λ
ρ
=
начало
nel = 17;
nuz = 10
nuz2 = 20;
Задание
c
S
;
Ввод
C
ρ
;
i = 1, nuz
j = 1, nel
pr[i,j] :=0.0
i = 1,nuz
j = 1,nel
ST[j,i] = SC[i,j]
Транспонирование
матрицы
C
S
A
Исходные данные:
nel – количество стержней
(элементов) фермы;
nuz – число узлов фермы;
nuz2 – удвоенное число
узлов этой фермы;
SC[nuz,nel] – структурная
матрица
C
S ;
C[nuz,2] – вектор коорди-
нат узлов фермы
Исходные данные:
nel – количество стержней (эле-
ментов) фермы;
nuz – число узлов фермы;
nuz2 – удвоенное число узлов
этой фермы;
SC[nuz,nel] – структурная матри-
ца
c
S
;
C[nuz,2] – вектор координат уз-
лов фермы
42
i =1,nel
j = nuz
ST[i,j]
≠
0
А
pr[i,1]:=pr[i,1]-ST[i,j]*C[j,1];
pr[i,2]:=pr[i,2]-ST[i,j]*C[j,2]
i:=1,nel
22
])2,[(])1,[(:][ ipripril +=
i:=1,nel
j:=1,2
][
],[
:],[
il
jipr
ji
=
α
B
да
нет
Вычисление значений
компонентов вектора про-
екций стержней
П
ρ
Определение значений
длин стержней l
i
Вычисление значений ком-
понентов вектора направ-
ляющих косинусов
α
ρ
                                 41                                                                             42


     1.2.2 Блок-схема алгоритма расчета статически
определимых ферм (рис.1.8)                                                                     А


                    начало
                                      Исходные данные:                                   i =1,nel
                                      nel – количество стержней (эле-                                                Исходные данные:
                                      ментов) фермы;                                                                 nel – количество стержней
               nel = 17;                                                                 j = nuz
                                      nuz – число узлов фермы;                                                       (элементов) фермы;
               nuz = 10               nuz2 – удвоенное число узлов                                                   nuz – число узлов фермы;
               nuz2 = 20;             этой фермы;                         нет                                        nuz2 – удвоенное число
                                      SC[nuz,nel] – структурная матри-                   ST[i,j] ≠ 0                 узлов этой фермы;
                                                                                                                     SC[nuz,nel] – структурная
                                      ца   Sc ;                                                    да
                                                                                                                     матрица  S C ; значений
                                                                                                                           Вычисление
             Задание     Sc ;         C[nuz,2] – вектор координат уз-
                    ρ                 лов фермы                              pr[i,1]:=pr[i,1]-ST[i,j]*C[j,1];
                                                                             pr[i,2]:=pr[i,2]-ST[i,j]*C[j,2]
                                                                                                                           компонентов
                                                                                                                     C[nuz,2]           вектора про-
                                                                                                                                            ρ
                                                                                                                              – вектор коорди-
             Ввод   C;                                                                                               нат узлов фермы
                                                                                                                           екций стержней П


                 i = 1, nuz


                 j = 1, nel
                                           Обнуление векторов                            i:=1,nel
                                           проекций стержней
                 pr[i,j] :=0.0             ρ
                                           П i , i = 1,Λ , nel;                                                              Определение значений
                                                                         l[i ] := ( pr[i,1]) 2 + ( pr[i,2]) 2                длин стержней li




                 i = 1,nuz
                                                                                         i:=1,nel

                  j = 1,nel
                                                                                         j:=1,2
                                       Транспонирование
          ST[j,i] = SC[i,j]
                                       матрицы    SC                                           pr[i, j ]                  Вычисление значений ком-
                                                                                α [i, j ] :=                              понентов вектора направ-
                                                                                                                                                 ρ
                                                                                                l[i ]                     ляющих косинусов   α

                     A


                                                                                               B

Страницы