Курсовая работа: Моделирование рассеяния плоской упругой продольной волны на упругом однородном изотропном цилиндрическом слое

8. Новацкий В. Теория упругости. – М.: Мир, 1975. 872с.

9. Поручиков В.Б. Методы динамической теории упругости. – М.: Наука, 1986, 328c.

10. Рамская Е.И. Анализ собственных частот и форм осесимметричных колебаний трансверсально-изотропной полой сферы. // Прикладная механика, 1983, т. 19, N 7, c.103-107.

11. Скобельцын С.А., Толоконников Л.А. Прохождение звуковых волн через трансверсально–изотропный неоднородный плоский слой. // Акуст. журн., 1990, т.36, N4, с. 740-744.

12. Толоконников Л.А. Прохождение звука через неоднородный анизотропный слой, граничащий с вязкими жидкостями. // Прикладная математика и механика, 1998, т. 62, N 6, с. 1029-1035.

13. Шендеров Е.Л. Импедансы колебаний трансверсально-изотропного сферического слоя.// Акуст. журн., 1985, т. 31, N 5, с. 644-649.

14. Шендеров Е.Л. Шоренко И.Н. Импедансы колебаний изотропной и трансверсально-изотропной сферических оболочек, вычисленные по различным теориям.// Акуст. журн., 1986, т. 32, N 1, с. 101-106.

15. Шульга Н.А. Распространение осесимметричных упругих волн в ортотропном полом цилиндре.// Прикладная механика,1974,т.10,N9,c.14-18.

16. Шульга Н.А. Собственные колебания трансверсально-изотропной полой сферы.// Прикладная механика, 1980, т.16, N 12, c.108-110.


ПРИЛОЖЕНИЕ 1. ЛИСТИНГ ПРОГРАММЫ

#include<stdio.h>

#include<conio.h>

#include<complex.h>

#include<stdlib.h>

#include<graphics.h>

#define K 7

#define M 50

#define N 16

#define MM 8

complex iii=complex(0.0,1.0);

double w;

complex const_w;

double r1,r2,h=0.5,L1,L2,L3,M1,M2,M3,R1,R2,R3;

int zad;

double eps=0.000001;

double C=0.577215664901532;

double module(complex x)

{ return(sqrt(real(x)*real(x)+imag(x)*imag(x))); }

double fact(double n)

К-во Просмотров: 481
Бесплатно скачать Курсовая работа: Моделирование рассеяния плоской упругой продольной волны на упругом однородном изотропном цилиндрическом слое